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Abstract 


This report describes my successful project to build a working reproduction of the 1964 
prototype for the Block I Apollo Guidance Computer. The AGC is the flight computer for the 
Apollo moon landings, and is the world's first integrated circuit computer. 

I built it in my basement. It took me 4 years. 

If you like, you can build one too. It will take you less time, and yours will be better than 
mine. 

I documented my project in 9 separate .pdf files: 

Part 1 Overview: Introduces the project. 

Part 2 CTL Module: Design and construction of the control module. 

Part 3 PROC Module: Design and construction of the processing (CPU) module. 

Part 4 MEM Module: Design and construction of the memory module. 

Part 5 IO Module: Design and construction of the display/keyboard (DSKY) module. 

Part 6 Assembler: A cross-assembler for AGC software development. 

Part 7 C++ Simulator: A low-level simulator that runs assembled AGC code. 

Part 8 Flight Software: My translation of portions of the COLOSSUS 249 flight 

software. 

Part 9 Test & Checkout: A suite of test programs in AGC assembly language. 



Overview 


The Control Module (CTL) has 9 subsystems: CMI, MON, CLK, SCL, TPG, SEQ, CPM-A, 
CPM-B, CPM-C 

CMI (Control Module external 
Interface) 

The CMI interfaces the other control 
module subsystems (described below) 
to external AGC modules. 40-pin IDE 
connectors interface to the PROC, 

MEM, and 10 modules. Inputs from 
those modules are buffered to 1 LSTTL 
load. 

MON (AGC Monitor) 

The monitor subsystem has the 
front-panel switches that control AGC 
operation, and also implements the 
power-up reset circuit. 


CLK (Clock) 

The AGC is controlled by a 2.048 MHz 
crystal clock. The clock is divided to 
produce a 2-phase, non-overlapping 
1.024 MHz AGC system clock for 
nominal operation. For test purposes, 
a low-frequency RC clock can also be 
selected, or the clock can be 
single-stepped. 

SCL (Scaler) 

The 1.024 MHz AGC clock is divided by 
two to produce a 512 kHz signal called 
the MASTER FREQUENCY; this signal 
is further divided through a SCALER, 
first by five to produce a 102.4 kHz 
signal. This is then divided by two 
through 17 successive stages called FI 
(51.2 kHz) through F17 (0.78125 Hz). 

The F10 stage (100 Hz) is fed back into the AGC to increment the real-time clock and other 
priority counters in the PROC module. The F17 stage is used to intermittently run the AGC 
when it operates in the STANDBY mode. 

TPG (Time Pulse Generator) 

AGC instructions are implemented in groups of 12 steps, called timing pulses. The timing 
pulses, named TP1 through TP12, are produced by the Time Pulse Generator (TPG). Each set 
of 12 timing pulses is called an instruction subsequence. Simple instructions, such as TC, 
execute in a single subsequence of 12 pulses. More complex instructions require several 
subseq uences. 

SEQ (Sequence Generator) 

The sequence generator has the SQ register, which holds the next op-code, and the CTR 



























register--a counter used to count instruction subsequences during multiplication. The 
sequence generator also has the branch register (BR) which controls conditional processing 
during instruction execution, and the STAGE registers (STA and STB) which select the 
instruction subsequences for complex instructions that have more than one subsequence. 

CPM-A (Control 
Pulse Matrix A) 

The CPM-A is the 
combinational logic 
matrix that 
implements most 
of the control logic. 

It is driven by 
inputs from the SQ 
register (which 
selects the 
instruction), the 
STB stage register 
(which selects the 
instruction 
subsequence), and 
the BR branch 
register (which 
selects conditional 
steps in a 
subsequence). 


CPM-B (Control 
Pulse Matrix B) 

The CPM-B 
decodes read and 
write control 
signals for special 

memory location associated with input/output registers, central registers (A, Q, Z, and LP), 
and the editing registers used for rotation and shifting. 

CPM-C (Control Pulse Matrix C) 

The CPM-C decodes control signals primarily associated with interrupts, the memory cycle, 
and the selection of new instructions and instruction subsequences. 
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This is a functional diagram showing the interrelationships between the Time Pulse 
Generator (TPG), the Control Pulse Matrix (CPM-A, B, and C), and the registers that are in 
the Sequence 

biA"*- j J I 
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Generator (SEQ). 


The diagram is 
mine, but the style 
is borrowed from 
original AGC 
documentation: 
control signals are 
represented by 
diamonds. The 
arrows show the 
direction of data 
flow. When a control 
signal is asserted, 
data is allowed to 
flow through the 
diamond. For 
example, when WSQ 
is asserted, the 
opcode is written 
from the Read/Write 
bus into the SQ 
register. 


cu<. 
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Registers (LOOPCTR, STA, STB, SQ, BR, and SNI) are represented by rectangles. The lower 
bit of the 2-bit STA register is set by ST1. The upper bit is set by any one of the 3 control 
signals flowing into it. The STA register is cleared by CLRSTA. 


When WSTB is asserted, the STA register is copied to STB. STB and the SQ register select 
the instruction subsequence. 


The instruction subsequence, time pulse generator, BR register, and SNI all feed into the 
Control Pulse Matrix to select the active control pulses. 


The diagram was developed by analyzing the R-393 document. It was one of my first 
diagrams; a sort-of conceptual breakthrough that became my gateway for understanding 
the AGC control module. 













































The instruction 
subsequences 
executed by the 
AGC are shown 
in this diagram. 
Each yellow 
circle is a 
subsequence; a 
set of 12 steps, 
with each step 
generating 0-5 
control pulses. 
Eleven steps 
(TP1-TP11) are 
in the yellow 
circle; the 12 th 
step, which 
selects the next 
subseq uence 
(TP12), is in the 
orange circle. 
This is discussed 
in more detail in 
the TPG, SEQ, 
and CPM-A 
subsystem s. 








































A late addition to the CTL design fixed a problem with the read bus logic. Due to 
propagation delays (and some poor design on my part), the tri-state buffers from multiple 
registers were simultaneously enabled for brief periods causing some transients. I "kludged" 
in a design change that suppressed output to the read bus during CLK1, thereby giving the 
bus control logic time to settle. 
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CTL Internal Subsystem Interconnections 


This diagram shows internal interconnections for the subsystems in the CTL module. 
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CTL Module External Interfaces 

The CTL module interfaces to the PROC, MEM, and 10 modules through 40-pin IDE ribbon 
cables. 


CTL mOD 
3"/0 3-crL 


JJIOO-CTL. 
ITIOI -CTL 


ltid'L-c.tl 


r/o mob 

X/03-10 
TlOk-IO 

JTI 04-10 


74 


75 


Vo 

4 — 


PROCmOL 

XIO4-PR0C 

3100-PR.0C 

TIOI-PRDC 

5/05-PROC 


/''‘-f 0 


-6, 


Vo 


mem mot) 

3X705-0)0* 

X/Ok-meh 

-►jjio'i-mon 


/ / 


A6C /A)7SC£DA0Ajfil7?D/2£> 





















J100-CTL: CTL-to-PROC I/F 

J100 is a 40-pin IDE ribbon cable that connects the CTL module to the PROC module 
OUTPUTS (from CTL): 


PIN 

siqnal 

full name 

state definition 

1 

WA3 

WRITE ADDR 3 (74) 

0 = Write reg at address 3 (LP) 

2 

WA2 

WRITE ADDR 2 (73) 

0 = Write reg at address 2 (Z) 

3 

WA1 

WRITE ADDR 1 (72) 

0 = Write reg at address 1 (Q) 

4 

WAO 

WRITE ADDR 0 (71) 

0 = Write reg at address 0 (A) 

5 

RA3 

READ ADDR 3 (60) 

0 = Read reg at address 3 (LP) 

6 

RA2 

READ ADDR 2 (59) 

0 = Read reg at address 2 (Z) 

7 

RA1 

READ ADDR 1 (58) 

0 = Read reg at address 1 (Q) 

8 

RAO 

READ ADDR 0 (57) 

0 = Read reg at address 0 (A) 

9 

WZ 

WRITE Z (50) 

0 = Write Z 

10 

WYx 

WRITE Y NO RESET (49) 

0 = Write Y (do not reset) 

11 

WY 

WRITE Y (48) 

0 = Write Y 

12 

WX 

WRITE X (47) 

0 = Write X 

13 

WQ 

WRITE Q (45) 

0 = Write Q 

14 

WOVR 

WRITE OVF (41) 

0 = Write overflow 

15 

WOVI 

WRITE OVF RUPT INH (40) 

0 = Write overflow RUPT inhibit 

16 

wove 

WRITE OVF CNTR (39) 

0 = Write overflow counter 

17 

WLP 

WRITE LP (38) 

0 = Write LP 

18 

WB 

WRITE B (36) 

0 = Write B 

19 

WALP 

WRITE A/LP (35) 

0 = Write A and LP 

20 

WA 

WRITE A (34) 

0 = Write A 

21 

F10X 

FI0 SCALER ONESHOT 

l=timed out (100.0 Ftz) 

23 

R24 

READ 24 (25) 

0 = Read 24 

24 

R22 

READ 22 (24) 

0 = Read 22 

25 

R2 

READ 2 (23) 

0 = Read 2 

26 

R1C 

READ 1 COMP (22) 

0 = Read 1 complimented 

27 

R1 

READ 1 (21) 

0 = Read 1 

28 

RZ 

READ Z (20) 

0 = Read Z 

29 

RU 

READ U (19) 

0 = Read sum 

30 

RSCT 

READ CNTR ADDR (18) 

0 = Read selected counter address 

31 

RSB 

READ SIGN (17) 

0 = Read sign bit 

32 

RRPA 

READ RUPT ADDR (16) 

0 = Read RUPT address 

33 

RQ 

READ Q (15) 

0 = Read Q 

34 

RLP 

READ LP (13) 

0 = Read LP 

35 

RC 

READ C (11) 

0 = Read C 

36 

RB14 

READ BIT 14 (10) 

0 = Read bit 14 

37 

RB 

READ B (9) 

0 = Read B 

38 

RA 

READ A (8) 

0 = Read A 

39 

KRPT 

KNOCK DOWN RUPT (6) 

0=Knock down Rupt priority 

40 

Cl 

SET CARRY IN (1) 

0 = Carry in 



J101-CTL: CTL-to-PROC I/F 

J101 is a 40-pin IDE ribbon cable that connects the CTL module to the PROC module. 


INPUTS (to CTL): 


PIN 

siqnal 

full name 


21 

SB_01 

SUB SEL 01 


22 

SB_02 

SUB SEL 02 


23 

IRQ 

INT RQST 


25 

WB_01 

WRITE 

BUS 

01 

26 

WB_02 

WRITE 

BUS 

02 

27 

WB_03 

WRITE 

BUS 

03 

28 

WB_04 

WRITE 

BUS 

04 

29 

WB_05 

WRITE 

BUS 

05 

30 

WB_06 

WRITE 

BUS 

06 

31 

WB_07 

WRITE 

BUS 

07 

32 

WB_08 

WRITE 

BUS 

08 

33 

WB_09 

WRITE 

BUS 

09 

34 

WB_10 

WRITE 

BUS 

10 

35 

WB_11 

WRITE 

BUS 

11 

36 

WB_12 

WRITE 

BUS 

12 

37 

WB_13 

WRITE 

BUS 

13 

38 

WB_14 

WRITE 

BUS 

14 

39 

WB_15 

WRITE 

BUS 

15 

40 

WB_16 

WRITE 

BUS 

16 


state definition 

SB_01 is LSB; SB_02 is MSB 

00 = no counter; 01 = PINC; 10 = MINC 

0 = interrupt requested. 

(Isb) 


US (overflow) bit 
SG (sign) bit 


OUTPUTS (from CTL): 


PIN 

siqnal 

full name 

1 

R2000 

READ 2000 (101) 

2 

WPCTR 

WRITE PCTR (98) 

3 

RPT 

READ RUPT (94) 

4 

INH 

SET INHINT (93) 

5 

CLRP 

CLEAR RPCELL(92) 

6 

CLIN H 1 

CLEAR INHINT1 (88) 

7 

CLIN H 

CLEAR INHINT (87) 

8 

GENRST 

GENERAL RESET (86) 

19 

CLK1 

CLOCK1 

20 

CLK2 

CLOCK2 


state definition 
0 = Read 2000 

0 = Write PCTR (latch priority counter 
sequence) 

0 = Read RUPT opcode 
0 = Set INHINT 
0 = Clear RPCELL 
0 = Clear INHINT1 
0 = Clear INHINT 
0 = General Reset 

1.024 MHz AGC clock 1 (normally low) 
1.024 MHz AGC clock 2 (normally low) 



J102-CTL: CTL-to-MEM I/F 

J102 is a 40-pin IDE ribbon cable that connects the CTL module to the MEM module. 


INPUTS (to CTL): 


PIN 

siqnal 

full name 



state definition 


31 

EQU_16 

ADDRESS 

= 016 

(1) 

0 = CADR in register S = 

016 

32 

EQU_17 

ADDRESS 

= 017 

(2) 

0=CADR in register S = 

017 

33 

GTR_17 

ADDRESS 

> 017 

(3) 

0 = CADR in register S > 

017 

34 

EQU_25 

ADDRESS 

= 025 

(4) 

0=CADR in register S = 

025 

35 

GTR_27 

ADDRESS 

> 027 

(5) 

0 = CADR in register S > 

027 

36 

GTR_1777 

ADDRESS 

> 01777 (6) 

0 = CADR in register S > 

01777 

37 

AD_1 

ADDRESS 

(1) 


where AD_4 is MSB, AD 

_1 is LSB 

38 

AD_2 

ADDRESS 

(2) 


(low-order bits of address) 

38 

AD_3 

ADDRESS 

(3) 




40 

AD_4 

ADDRESS 

(4) 





OUTPUTS (from CTL): 


PIN 

siqnal 

full name 

state definition 

1 

WE 

WRITE EMEM (97) 

0 = Write E-MEM from G 

2 

SBWG 

WRITE G (95) 

0 = Write G from memory 

3 

GENRST 

GENERAL RESET (86) 

0 = General Reset 

4 

W23 

WRITE ADDR 23 (85) 

0 = Write into SL 

5 

W22 

WRITE ADDR 22 (84) 

0 = Write into CYL 

6 

W21 

WRITE ADDR 21 (83) 

0 = Write into SR 

7 

W20 

WRITE ADDR 20 (82) 

0 = Write into CYR 

8 

WGn 

WRITE G NORMAL (81) 

0 = Write G (normal gates) 

9 

WBK 

WRITE BNK (80) 

0 = Write BNK reg 

10 

RBK 

READ BNK (70) 

0 = Read BNK reg 

11 

WS 

WRITE S (46) 

0 = Write S 

12 

WP2 

WRITE P2 (44) 

0 = Write P2 

13 

WPx 

WRITE P NO RESET (43) 

0 = Write P (do not reset) 

14 

WP 

WRITE P (42) 

0 = Write P 

15 

WGx 

WRITE G NO RESET (37) 

0 = Write G (do not reset) 

16 

TP 

TEST PARITY (30) 

0 = Test parity 

17 

RP2 

READ PARITY 2 (14) 

0 = Read parity 2 

18 

RG 

READ G (12) 

0 = Read G 

19 

GP 

GEN PARITY (5) 

0 = Generate Parity 

20 

CLG 

CLR G (2) 

0= Clear G 

21 

CLK2 

CLOCK2 

1.024 MHz AGC clock 2 (normally low) 

22 

CLK1 

CLOCK1 

1.024 MHz AGC clock 1 (normally low) 

23 

NPURST 

POWER UP RESET 

0 = reset, l = normal operation. 

24 

SWCLK 

DEBOUNCE CLOCK 

low freq elk for switch debounce 

25 

FCLK 

CLOCK MODE 

l = free-running elk mode; 0=single elk 
mode 



J103-CTL: CTL-to-I/O I/F 

J100 is a 40-pin IDE ribbon cable that connects the CTL module to the I/O module. 


INPUTS (to CTL): 

PIN signal full name 

40 OUTl_8 STANDBY ENABLED 


state definition 

l = standby enabled; works with STANDBY 
ALLOWED switch 


OUTPUTS (from CTL): 


PIN 

siqnal 

full name 

1 

CLK1 

CLOCK1 

2 

CLK2 

CLOCK2 

3 

NSA 

STANDBY ALLOWED 

5 

GENRST 

GENERAL RESET (86) 

6 

WA11 

WRITE OUT 1 (76) 

7 

WA10 

WRITE OUTO (75) 

8 

RA11 

READ OUT1 (66) 

9 

RA4 

READ INO (61) 

20 

STBY 

STANDBY 


state definition 

1.024 MHz AGO clock 1 (normally low) 
1.024 MHz AGO clock 2 (normally low) 

0 = standby allowed 
0 = clear the DSKY, OUT1, and OUT2. 

0 = write into OUT1 from write bus 
0 = write into OUTO (DSKY) from write bus 
0 = output OUT1 register to read bus 
0 = output INO register to read bus 
0 = AGC is in the standby state 
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MON (AGC Monitor) 


MON INPUTS: 

IZE 


siqnal 

full name 

SW-RUN 

NSW-RUN 

RUN/STEP SELECT SW 

SW-INS 

NSW-INS 

STEP MODE SW 

SW-FCL 

NSW-FCL 

CLOCK MODE SW 

SW-SA 

NSW-SA 

STANDBY ALLOWED S^ 

SW-STP 

NSW-STP 

INST STEP SW 

SW-MCL 

NSW-MCL 

CLOCK STEP SW 

SW-RST 

MASTER RESET SW 


state definition 


MON OUTPUTS: 


-o 

-5 


MON 
SW-RUN 
NSW-RUN 
NRUN 
SW-INS 
NSW-INS 
INST 
SW-FCL 
NSW-FCL 
FOLK 
SW-SA 
NSW-SA 

NSA 
SW-STP 
NSW-STP 
NSTEP 
SW-MCL 
NSW-MCL 
MCLK 
SW-RST 
NPURST 


siqnal 

full name 

NRUN 

RUN/HALT 

INST 

INST STEP MODE 

NSTEP 

SINGLE STEP 

NSA 

STANDBY ALLOWED 

MCLK 

CLOCK STEP 

FCLK 

CLOCK MODE 

NPURST 

POWER UP RESET 

SENAB 

SCALER ENABLE 


state definition 

0 = run, l = step 

l = instruction step, 0 = sequence step 
0 = step (momentary) 

0 = standby allowed 

l = step (momentary); triggers a single 
clock pulse. Ignored if FCLK is 1. 
l = continuous clock output at 1.024 MHz, 
0 = single clock 

0 = reset, l = normal operation. 
l = enable counting; 0 = hold 









CTL CONTROL PANEL SWITCHES 


fl&C CONTROL 


FIO FI3 FIT 


RESET 


CLOCK CONTROL SfflLER. 

RATE 'fc I MHZ. i-RUN STEP ^ENA 


EXECUTION CONTROL 


ST BY 


ftUN IN5T 5TEP & ALMVED 


j\nI t ^ I iIMl I- K.UIM Jl tr r\uiM i/vji Jitr nujjwcu 

On 3- 1 □ r» □ □jD-» c 

^—SLOW STEP- 1 ^,DI5A STEP- 1 SEGl DISABLED 


DI5A STEP- 1 SEGl 


Clock Control: 

RATE Controls the slow clock rate when the 1MHZ/SLOW switch is in the SLOW 

position. 

1MHZ/SLOW Selects the free-running clock rate when the RUN/STEP switch is in the RUN 
position. The 1MHZ position gates a 2MHz signal into the 2-phased clock 
which produces a 1MHz 2-phased clock rate. The SLOW position gates a low 
frequency clock; the frequency is controlled by RATE. 

RUN/STEP Selects a free-running (RUN) or a single-stepped (STEP) clock. In the RUN 
position, the rate is controlled by the 1MHZ/SLOW switch. In the STEP 
position, the clock steps each time the STEP button is depressed. 

STEP Manually steps the clock when the RUN/STEP switch is in the STEP position. 

The clock is 2-phased, so each press steps an alternate phase. 


Scaler: 

ENAB/DISAB 

FIO 

F13 

F17 


Enables or disables the SCALER. 

Manually triggers the FIO stage of the SCALER. 
Manually triggers the F13 stage of the SCALER. 
Manually triggers the F17 stage of the SCALER. 











Execution Control: 


RUN/STEP In the RUN position, the AGC free-runs at a rate determined by the clock 

controls. In the STEP position, the AGC single-steps to the next instruction or 
next sequence when the STEP button is depressed; the rate is determined by 
the clock controls. 


INST/SEQ Selects whether the AGC single-steps all the way to the next instruction 

(INST) or just to the next sequence (SEQ). Some instructions, such as TC, 
have a single sequence; on these instructions, the switch has the same effect 
in either position. 

STEP Single-steps the AGC when the RUN/STEP switch is in the STEP position. 


RESET Reset the entire AGC. Puts the TPG into the standby state. 


Standby: 

ALLOW/DISA The ALLOWED position authorizes the AGC software to put the AGC in standby 
mode. The AGC is released from standby mode by a signal from F17 in the 
SCALER. If the scaler switch is in the DISAB position, the scaler is disabled, 
and the AGC will remain in the standby state. When the standby switch is in 
the DISAB position, the standby mode is inhibited. 


Normal Operation: 

Set the following switch positions for nominal operation: 


switch 

1MHZ/SLOW 

RUN/STEP 

ENAB/DISAB 

RUN/STEP 

ALLOW/DISA 


position 

1MHZ 

RUN (clock control) 
ENAB (scaler) 

RUN (execution control) 
ALLOWED (standby) 



CTL CONTROL SWITCH CONNECTIONS 


PIN 

siqnal 



state definition 

1 

BUS# 10, 

line 

1 

Execution control: RUN/STEP 

2 

BUS# 10, 

line 

2 


3 

BUS# 10, 

line 

3 

Execution control: INST/SEQ 

4 

BUS# 10, 

line 

4 


5 

BUS# 10, 

line 

5 

Clock control: RUN/STEP 

6 

BUS# 10, 

line 

6 


7 

BUS# 10, 

line 

7 

STANDBY ALLOWED/DISABLED 

8 

BUS# 10, 

line 

8 


9 

BUS# 10, 

line 

9 

Execution control: STEP 

10 

BUS# 10, 

line 

10 


11 

BUS# 10, 

line 

11 

Clock control: STEP 

12 

BUS# 10, 

line 

12 


13 

BUS# 10, 

line 

13 

RESET 

14 

BUS# 10, 

line 

14 

SCALER DISAB 

15 

RATE 



(SLOW) CLOCK CONTROL RATE 

16 

1MHZ 



Clock control: 1MHZ/SLOW 

17 

SLOW 




18 

F10 



MANUAL TRIGGER F10 

19 

F13 



MANUAL TRIGGER F13 

20 

F17 



MANUAL TRIGGER F17 



RUN/STEP 

SELECT 


Front panel 


switch bus 


RUN 

Sll 

5 pm 3S 


e: 


STEP 


EXECUTION 
CONTROL GROUP 


STEP 

MODE 


INSTR 

38 

spm sh 

—— 


SE2 


EXECUTION 
CONTROL GROUP 


CLOCK 

MODE 


RUN 

310 

3?m 3W 
—o-Sr 


STEP 


CLOCK 

CONTROL GROUP 


STANDBY 

ALLOWED 

39 

spm 5 jj 

-- 

STANDBY 

DISABLED 


INST 

STEF 


35 

3Pm pb 



p 

1C 


EXECUTION 
CONTROL GROUP 


CLOCK 

STEF 


34 

3PDT PB 

Or 


f° 


■o | o- 


LL 

1L 


CLOCK 

CONTROL GROUP- 


MASTER 

RESET 


36 

KC PB 

- 11 


SCALER 
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spm sw 
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V35 
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10k 
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AGC MONITOR 

SWITCH DEBOUNCE CLOCK 


Ulli 


_ 555 

Snd Vc 
-^Trg D is. 
Xhr 

Hat Ct 


< RB4 
<33k 
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C5 


C4 


01uF^2.2uT 


- 3XCLR ~> 


Front panel DEBOUNCE 
switch bus 



R12 
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-*aaa>- 


Rll 
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U25C 

74LS00 



RIO 
2.2k^ 


fTE y?PR 


V4 

5V 
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CLOCK 

SYNCHRONIZER 


V3€ 

5V 


+V 

O 
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U24A 


1 


3 

D 5 = 

:? q» 

R 


T 


-1*)d 3 ; 


U24E 

0 


1 


M-^C? 511 

a 


!] 




74LS7S 


- ^f3X£; > 


74L374 
- ^-'CLr. 


y. SXCtK 


provides an additional 
level of debounce for 
spring-leaded toggle 
switches where the 
excursion in the contact 
bounce is sufficient to 
trigger an unwanted pulse 


AGC MONITOR 
(MON) 42 

























































































buffered reset 

U2SA TJ2SS 

74L3C4 74LSC4 

























































































































CTL INDICATORS 


The CTL module has a panel of indicator lamps (LEDs) to show the state of CTL registers and 
critical logic signals. 


These indicator 
lamps show the 
current state of all 
registers and some 
additional, 
important logic 
signals produced by 
the CTL module. 

The matrix of lamps 
in the lower portion 
show active 
subsequences. Much 
of the control logic 
is negative (active 
low) where an 
illuminated lamp 
means that the 
signal is NOT 
asserted. At the 
time the photo was 
taken the AGC was 
running 
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flight software load, executing Verb 16, Noun 36: a monitor verb which displays the AGC 
real time clock. 
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CLK (Clock) 


The original AGC used asynchronous logic driven by a 
synchronous logic driven by a 2-phase non¬ 
overlapping clock. The synchronous clock logic 
was designed to produce the following state 
transitions: 


4-phase clock. This recreation uses 


FFA 

0 

0 

1 

1 


FFB 

0 

1 

1 

0 


idle state 

decoded for phase 1 
decoded for phase 2 



rf ft 
£-2l 
o o 


/*• 

/z- 


The outputs of FFA and FFB are decoded by 
combinational logic to produce the non¬ 
overlapping phase 1 and phase 2 clock signals. 
The sequence is arranged so there is a single 
logic level transition for each state transition to 
prevent transients. 




btmt 

O 

0 

/ 

/ 


8iri 

O 

I 

o 

/ 


F/plfiL. 

ZTMZ. 

0 

I 

o 

/ 


W-QJ5 
K* - 35 


JK 
o X 


SmrL Jkd A 0T&- 


o 

o 

/ 

/ 

o 


o X 
o X 
/ A 

A O 
X I 





























CLKINPUTS 


I/F signal 
MON: 

MCLK 

FOLK 

NPURST 


OUTPUTS: 

signal 

CLK 1 
CLK2 


full name 


state definition 


CLOCK STEP 
CLOCK MODE 
POWER UP RESET 


l = step (momentary); triggers a single 
clock pulse. Ignored if FCLK is 1. 
l = continuous clock output at 1.024 MFI 
0 = single clock whenever MCLK is 1. 

0 = power up reset 


full name 

CLOCK1 
CLOCK2 


state definition 

1.024 MHz AGC clock 1 (normally low) 
1.024 MHz AGC clock 2 (normally low) 


-0 


CLK 
(NPURST 

CK1 

MCLK 
FCLK CK2 









AGC CLOCK 


racA uaoB 



2.048 vhz CLOCK or SLO», 

VARIABLE RATE CLOCK ASC CLOCK 

ICLK) *1 


FCLR=i: free-running 
clock; 

FCLK=Q: manually- 
stepped clock 






































































RATE 


CIRCUIT SELECTS BETWEEN A 
FAST, FIXED-RATE CLOCK AND 
A SLOW, VARIABLE-RATE 
CLOCK. 


P2 01 
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2 MHZ CLOCK INPUT 
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AGC CLOCK 
(CLK) #2 
























































SCL (Scaler) 


The 1.024 MHz AGC clock is 
divided by two to produce a 
512 kHz signal called the 
MASTER FREQUENCY; this 
signal is further divided 
through a SCALER, first by 
five to produce a 102.4 kHz 
signal. This is then divided 
by two through 17 
successive stages called FI 
(51.2 kHz) through F17 
(0.78125 Hz). The F10 stage 
(100 Hz) is fed back into the 
AGC to increment the 
real-time clock and other 
priority counters in the PROC 
module. The F17 stage is 
used to intermittently run 
the AGC when it operates in 
the STANDBY mode. 

The F10, F13, and F17 
outputs of the SCALER feed 
into a synchronous one-shot 
that produces a short output 
pulse on the rising edge of 
the input. 
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SCALER (SCL) ONE-SHOT LOGIC DESIGN 

Boolean operators: 

* (AND), + (OR), ' (NOT) 


Scaler Divide-by-10 Excitation Table : 

The divide-by-10 state machine is implemented with a 74161 parallel counter. Control Mode 
for 74161 Parallel Counter: 


NPE CET 

0 x LOAD 

1 1 COUNT 

1 0 HOLD 


Current 
State D C B A 
0 0 0 0 0 

1 0 0 0 1 

2 0 0 1 0 

3 0 0 1 1 

4 0 10 0 

5 0 10 1 

6 0 110 

7 0 111 

8 10 0 0 

9 10 0 1 


Next 


Par In 

D C B A 

NPE 

CET 

0 0 0 1 

1 

1 

0 0 10 

1 

1 

0 0 11 

1 

1 

0 10 0 

1 

1 

0 10 1 

1 

1 

0 110 

1 

1 

0 111 

1 

1 

10 0 0 

1 

1 

10 0 1 

1 

1 

0 0 0 0 

0 

X 


NPE = (D * A)' 
CET = 1 


One-shot Excitation Table : 

The one-shot state machine is implemented with two J-K FFs. 


JK flip-flop excitation table: 

J K 

0 0 Qn-1 (no change) 

0 10 
10 1 
1 1 Qn-1' (toggle) 


FN is the one-shot trigger; Q(A) is the one-shot output. 



Cur 

Inp 

Nxt 

ffB 

ffA 

State 

B A 

FN 

B A 

J K 

J K 

IDLE 

0 0 

0 

0 0 

0 x 

0 x 


0 0 

1 

0 1 

0 x 

1 X 



HIGH 


LOW 


UNUSED 


0 1 

0 

1 0 

1 X 

X 1 

0 1 

1 

1 0 

1 X 

X 1 

1 0 

0 

0 0 

x 1 

0 x 

1 0 

1 

1 0 

x 0 

0 x 

1 1 

0 

X X 

X X 

X X 

1 1 

1 

X X 

X X 

X X 


The excitation table and logic equations were derived from the CLK subsystem state 
machine which also performs a one-shot function. The CLK subsystems's FOLK signal was 
factored out by setting it to zero. The MCLK input is the one-shot trigger; it was renamed 
FN. 

ff( B) J = QA 
ff(B) K = FN' 

ff(A) J = QB' * FN 
ff(A) K = QA 



SCLINPUTS 


I/F signal 
CLK: 

CLK1 


full name 


CLOCK1 


MON: 


SW-SEN 


0= hold 


NPURST 


SCL OUTPUTS: 


SCALER ENABLE 
POWER UP RESET 


siqnal 

full name 

F10X 

FI0 SCALER ONESHOT 

F13X 

FI3 SCALER ONESHOT 

F17X 

FI7 SCALER ONESHOT 
Hz) 

FI 

SCALER OUT FI 

F2 

SCALER OUT F2 

F3 

SCALER OUT F3 

F4 

SCALER OUT F4 

F5 

SCALER OUT F5 

F6 

SCALER OUT F6 

F7 

SCALER OUT F7 

F8 

SCALER OUT F8 

F9 

SCALER OUT F9 

F10 

SCALER OUT F10 

Fll 

SCALER OUT Fll 

F12 

SCALER OUT F12 

F13 

SCALER OUT F13 

F14 

SCALER OUT F14 

F15 

SCALER OUT F15 

F16 

SCALER OUT F16 

F17 

SCALER OUT F17 

Note: 

One shot outputs are active fo 
State transitions occur on the 


state definition 
1.024 MHz AGC clock 

l = enable counting; 

0 = power up reset 

state definition 
l = timed out (100.0 Hz) 
l = timed out ( 12.5 Hz) 
l=timed out ( 0.78125 


51.2 KHz square wave 
25.6 KHz square wave 
12.8 KHz square wave 
6,4 KHz square wave 
3.2 KHz square wave 
1.6 KHz square wave 
0.8 KHz square wave 
0.4 KHz square wave 
0.2 KHz square wave 
0.1 KHz square wave (100 Hz) 
50.0 Hz square wave 
25.0 Hz square wave 
12.5 Hz square wave 
6.25 Hz square wave 
3.125 Hz square wave 
1.5625 Hz square wave 
0.78125 Hz square wave 


SCL 
-SW-SEN 

-o|npurst 

F10X 
F13X 
F17X 

-ICK1 

FI 
F2 
F3 
F4 
F5 
F6 
F7 
FS 
F9 
F10 
Fll 
F12 
F13 
FI 4 
F15 
FI 6 
F17 










SCALER 
(SCL) *1 





















































































































Scaler 





















































































































TPG (Time Pulse Generator) 











TIME PULSE GENERATOR (TPG) LOGIC DESIGN 


Boolean operators: 

* (AND), + (OR), ' (NOT) 


TPG Internal Control Signals : 

These are local to the TPG; if the signal is 
d, TPG makes a state transition. These 
signals are the inputs to the excitation 

TPG_0 = PURST' * ( FOLK’ + F17X ) 

TPG_1 = FCLK 1 + F13X 

TPG_2 = RUN + (SNI 1 * INST) 

TPG_3 = SNI * OUTl_8 * SA 

TPG_4 = STEP' 


TPG_5 = STEP + RUN 



asserte 

decoded 

table. 


TPG Excitation Table : 

Control Mode for 74161 Parallel Counter: 


NPE CET 

0 x LOAD 

1 1 COUNT 

1 0 HOLD 


^denotes active low 


State 

Current 

D C B A 

^Current 

Decoder 

TPG_ 
0 12 

X 

3 4 

5 

Next 

D C B A 

*NPE 

CET 

STBY 

0 

0 

0 

0 

NSTBY 

0 

X 

X 

X 

X 

X 

0 

0 

0 

0 

1 

0 







1 

X 

X 

X 

X 

X 

0 

0 

0 

1 

1 

1 

PWRONO 

0 

0 

1 

NPWRON 

X 

0 

X 

X 

X 

X 

0 

0 

0 

1 

1 

0 







X 

1 

X 

X 

X 

X 

0 

0 

1 

0 

1 

1 

TP1 

0 

0 

1 

0 

NTP1 

X 

X 

X 

X 

X 

X 

0 

0 

1 

1 

1 

1 

TP2 

0 

0 

1 

1 

NTP2 

X 

X 

X 

X 

X 

X 

0 

1 

0 

0 

1 

1 

TP3 

0 

1 

0 

0 

NTP3 

X 

X 

X 

X 

X 

X 

0 

1 

0 

1 

1 

1 

TP4 

0 

1 

0 

1 

NTP4 

X 

X 

X 

X 

X 

X 

0 

1 

1 

0 

1 

1 

TP5 

0 

1 

1 

0 

NTP5 

X 

X 

X 

X 

X 

X 

0 

1 

1 

1 

1 

1 

TP6 

0 

1 

1 

1 

NTP6 

X 

X 

X 

X 

X 

X 

1 

0 

0 

0 

1 

1 

TP7 

1 

0 

0 

0 

NTP7 

X 

X 

X 

X 

X 

X 

1 

0 

0 

1 

1 

1 

TP8 

1 

0 

0 

1 

NTP8 

X 

X 

X 

X 

X 

X 

1 

0 

1 

0 

1 

1 

TP9 

1 

0 

1 

0 

NTP9 

X 

X 

X 

X 

X 

X 

1 

0 

1 

1 

1 

1 

TP10 

1 

0 

1 

1 

NTP10 

X 

X 

X 

X 

X 

X 

1 

1 

0 

0 

1 

1 

TP11 

1 

1 

0 

0 

NTP11 

X 

X 

X 

X 

X 

X 

1 

1 

0 

1 

1 

1 















TP12 110 1 NTP12 xxxlxx 0000 0 x 0000 

xxlOxx 0010 0 x 0010 

xxOOxx 1110 1 1 

SRLSE 1110 NSRLSE xxxxOx 1110 1 0 

xxxxlx 1111 1 1 

WAIT 1111 NWAIT xxxxxl 0010 0 x 0010 

xxxxxO 1111 1 0 

Maxterms : 

NPE = (NTP12 + TPG_3') * (NTP12 + TPG_2' + TPG_3) * (NWAIT + TPG_5') 

CET = (NSTBY + TPG_0) * (NPWRON + TPG_1) * (NSRLSE + TPG_4) * (NWAIT + TPG_5) 

Par In A,B,C = 0 

Par In B = (NTP12 1 * TPG_3)’ 



TPG INPUTS 


IZE 

signal 

full name 

MON: 


NRUN 

RUN/HALT 


INST 

INST STEP MODE 

0 = sequence step 



NSTEP 

SINGLE STEP 


FCLK 

CLOCK MODE 


NSA 

STANDBY ALLOWED 


NPURST 

POWER UP RESET 

CLK: 


CLK 1 

CLOCK1 

SEQ: 


SNI 

SELECT NEXT INST 

SCL: 


F17X 

FI7 SCALER ONESHOT 


F13X 

FI3 SCALER ONESHOT 

OUT: 


OUTl_8 

STANDBY ENABLED 

TPG OUTPUTS: 



siqnal 

full name 


TPG_Q3 
TPG_Q2 
TPG_Q1 
TPG_Q0 

TPG STATE 


state definition 


0 = run, l = step 
l = instruction step, 

0 = step (momentary) 
l = continuous, 0 = single 
clock 

0 = standby allowed 
0 = power up reset 


1024 MHz AGC clock 1 


l = select next instruction 


l = timed out 
l = timed out 


-0 

-o 

-o: 

-o 


TPG 

- CK1 

-F13X 

-F17X 

- SNI 
-18 

TG3 
XG2 
TGI 
TGO 

NPURST 
NRUN 
INST 
NSTEP 
FCLK 
NS A 


l = standby enabled; works with STANDBY 
ALLOWED switch 


state definition 

where Q0 is LSB, Q3 is MSB: 

00 = STBY 

01 = PWRON 

02 = TP1 

03 = TP2 

04 = TP3 

05 = TP4 

06 = TP5 

07 = TP6 

08 = TP7 

09 = TP8 

10 = TP9 

11 = TP10 

12 = TP11 

13 = TP12 

14 = SRLSE 

15 = WAIT 









STATE C3BKE3 OCCUR OK 
RI5IKG EDGE Of CLK1 
























































































































































SEQ (Sequence Generator) 

The sequence generator contains the stage registers and branch registers that (along with 
the time pulse generator) control execution of the microinstruction sequence. 



Some back-of-the-envelope design that went into the branch 
register logic is shown in the next few charts. This is the 
conceptual design for the branch register. It has 2 flip-flops 
named BR2 and BR1. The flip-flops are set by the control signals 
shown as diamonds in this diagram. 


The J and K 
inputs to the BR1 
flip-flop are 
developed in this 
chart. 
































































This chart shows 
the J and K inputs 
to the BR2 flip-flop. 
Logic to sense a l's 
compliment minus 
zero from the write 
bus is also 
developed. 


























































Here are some charts showing the stage 
register design. This is the conceptual 
design. There are (2) 2-bit stage registers: 
STA and STB. 


r- 








S 

ID 


V 



This is my initial cut at STA and STB. My initial attempt at CLSTB is scratched out and then 
developed into the correct solution on the later charts. 



















































































This is the J input to the STA2 flip- 
flop. The initial design is at the 
top. In the middle, I 
"DeMorganize" it using some 
bubble-pushing to get the final 
implementation at the bottom. 




Here's the J and K inputs to 
STB1 and STB2. This is the 
logic that transfers the 
contents of the STA flip- 
flops to STB. 
































































































































The J and K inputs to STB1 and STB2 move through a multi-step DeMorganizing process in 
the next 2 charts to reach their final state: 




































































































SEQ INPUTS 


I/F signal full name 

CLK: 

CLK2 CLOCK 2 


state definition 


data transfer occurs on falling edge 


CPM-C: 


GENRST 

GENERAL RESET 

WSQ 

WRITE SQ 

CLISQ 

CLEAR SNI 

CLSTA 

CLEAR STA 

WSTB 

WRITE STB 

CLSTB 

CLEAR STB 

SETSTB 

SET ST1 


CPM-A: 


TRSM 

TEST RESUME 

TSGN 

TEST SIGN 

TSGN2 

TEST SIGN 2 

ST 1 

SET STAGE 1 

ST2 

SET STAGE 2 

CLCTR 

CLR LOOP CTR 

CTR 

INCR LOOP CTR 

TMZ 

TEST MINUS ZERO 

TOV 

TEST OVF 

NISQ 

NEW INSTRUCT 

SQ reg 


WBUS: 


WB_ 

.01 

WRITE 

BUS 

01 

WB_ 

14 

WRITE 

BUS 

14 

WB_ 

.15 

WRITE 

BUS 

15 

WB_ 

.16 

WRITE 

BUS 

16 


0 = General Reset 
0 = Write SQ 
0 = Clear SNI 
0 = Clear state counter A 

(STA) 

0 = Write stage counter B 

(STB) 

0 = Clear state counter B 
(STB) 

0 = Set the ST1 bit of STB 


0 = Test for resume 
0=Test sign 
0 = Test sign 2 
0 = Stage 1 
0 = Stage 2 

0 = Clear loop counter 
0 = Loop counter 
0 = Test for minus zero 
0 = Test for overflow 
0 = New instruction to the 


US (overflow) bit for write bus 
SG (sign) bit for write bus 


-o 

-o 

-0 

-o 

-c 

-c 

-o 

-o 

-0 

-0 

-0 

-0 

-c 

-o 


SEQ 

CK2 BR1 
3R2 

RST 

WSQ SQ3 
NISQ SQ2 
CIQ SQ1 
ST1 SQO 
ST2 

TRSM S31 

CSTA S30 

WST3 

CST3 LPo 

SST3 SNI 

TSGN 

TOV 

TMZ 

TSGN2 

CTR 

CLCTR 


-W16 

-Wi5 

-W14 

-W13 

-W12 

-Wll 

-W10 

- W9 
-W8 
-W7 

- W6 

- W5 

- W4 

- W3 
-W2 
-W1 

-OEQ25 


ADR: 

EQU_25 ADDRESS = 025 


0 = CADR in register S evaluates to = 025 


SEQ OUTPUTS: 

full name 

BRANCH REG 1 
BRANCH REG 2 


I/F signal 
CPM-A: 

BR1 

BR2 


state definition 


where BR1 is MSB, BR2 is LSB 
BROO =0 BR1 = 0, BR2 = 0 
BRO1 =1 BR 1 = 0, BR2= 1 

BRIO =2 BR 1 = 1, BR2 = 0 
BR11 =3 BR 1 = 1, BR2= 1 









SQ_3 

INST REG 

SQ_2 


SQ_1 


SQ_0 


STB_1 

STAGE REG 

STB_0 


LOOP6 

LOOPCNTR EQ 6 

SNI 

SELECT NEXT INST 


where SQ_3 is MSB, SQ_0 is LSB 

where STB_1 is MSB, STB_0 is LSB 

0 = LOOPCNTR is holding the number 6. 
l = select next instruction (SNI register) 
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CPM-A (Control Pulse Matrix A) 

In this AGC replica, the CPM-A subsequences are implemented in EPROM (they were 
implemented as a diode matrix in the original). The address into the EPROM is constructed 
as follows (bit 1 is the LSB): 

bit 

13,14 CTR subsequence (2) 

9-12: register SQ (4) 

7,8: register STB (2) 

3-6: register SG (4) 

2: register BR1 (1) 

1: register BR2 (1) 

Bits 7-14 (STB, SQ, and CTR) select the instruction subsequence. Bits 1-6 select the control 
pulses (control logic signals) that are asserted from that subsequence. 


SELECTING THE INSTRUCTION SUBSEQUENCE 

The 11 AGC instructions, priority counter operations, and interrupt operations are 
implemented in 22 instruction subsequences. Some instructions (TC) have a single 
subsequence; others have several subsequences. 

The instruction subsequence is choosen by CTR, SQ, and STB. These form bits 7-14 of the 
CPM-A EPROM address. 


CTR (EPROM address bits 13-14) 

The CTR signal has 2 lines: SB_02 is the MSB; SB_01 is the LSB. The signal comes from the 
CTR subsystem in the PROC module. It indicates whether processing needs to be briefly 
interrupted to insert a PINC or MINC subsequence to increment or decrement a priority 
counter. 

CTROO: SB_02 = 0, SB_01 = 0 no counter; do the next subsequence 

CTR01: SB_02 = 0, SB_01 = 1 PINC 

CTR10 : SB_02 = 1, SB_01 = 0 MINC 

CTR11: SB_02 = 1, SB_01 = 1 both; they cancel out, so do the next 

subseq uence 


Register SQ (EPROM address bits 9-12) 


The 4-bit SQ register holds the currently executing instruction. The code in the SQ register 
is the same as the op code for these four instructions. 


NMEM SQ REG 
TC 00 
CCS 01 
INDEX 02 
XCH 03 


OPCODE 

00 

01 

02 

03 


USAGE _ 
TC K 
CCS K 
INDEX K 
XCH K 


DESCRIPTION CYCLES 

Transfer Control 1 MCT 

Count, Compare, Skip 2 MCT 
Index 2 MCT 

Exchange 2 MCT 


The SQ register code for these four instructions is the op code + 010 (octal). This happens 
because all of these instructions have bit 15 set (the sign (SG) bit) while in memory. When 




the instruction is copied from memory to the memory buffer register (G) to register B, the 
SG bit moves from bit 15 to bit 16 and the sign is copied back into bit 15 (US). Therefore, 
the CS op code (04) becomes (14), and so on. 


NMEM 

SQ REG 

OPCODE 

USAGE 

DESCRIPTION 

CYCLES 

CS 

014 

04 

CS K 

Clear and Subtract 

2 MCT 

TS 

015 

05 

TS K 

Transfer to Storage 

2 MCT 

AD 

016 

06 

AD K 

Add 

2 or 3 MCT 

MASK 

017 

07 

MASK K 

Bitwise AND 

2 MCT 


These are the three extended instructions. They are accessed by executing an INDEX 5777 
before each instruction. By convention, address 5777 contains 47777. The INDEX instruction 
adds 47777 to the extended instruction to form the SQ op code. For example, the INDEX 
adds 4 to the 4 op code for MP to produce the 11 (octal; the addition generates an 
end-around-carry). SQ register code (the 7777 part is a negative zero). 


NMEM 

SO REG 

OPCODE 

USAGE 

DESCRIPTION 

CYCLES 

MP 

Oil 

04 

MP K 

Multiply 

10 MCT 

DV 

012 

05 

DV K 

Divide 

18 MCT 

SU 

013 

06 

SU K 

Subtract 

4 or 5 MCT 


STB (EPROM address bits 7-8) 

The stage register B (STB) selects the subsequence for a given instruction. Some instructions 
have multiple subsequences; others (TC) have only one. 

The stage register has 2 bits: STB2 is the MSB; STB1 is the LSB. All instructions initiallly 
begin with the stage register set to zero. If an instruction needs more than one subsequence, 
the stage register is incremented to select the next subsequence. 

STB00: STB2 = 0, STB1 = 0 

STB01: STB2 = 0, STB1 = 1 

STB10: STB2 = 1, STB1 = 0 

STB11: STB2 = 1, STB1 = 1 


INSTRUCTION SUBSEQUENCES 

There are 22 instruction subsequences: 


TC0 

0 

CCSO 

1 

CCS1 

2 

NDX0 

3 

NDX1 

4 

RSM3 

5 

XCH0 

6 

CSO 

7 

TS0 

8 

ADO 

9 

MASK0 

10 

MP0 

11 

MP1 

12 




MP3 

13 

DVO 

14 

DV1 

15 

SUO 

16 

RUPT1 

17 

RUPT3 

18 

STD2 

19 

PINCO 

20 

MINCO 

21 


If the CTR signals are 01 (SB_02 = 0, SB_01 = 1) the PINC subsequence is selected. If the CTR 
signals are 10 (SB_02=1, SB_01 = 0) the MINC subsequence is selected. Otherwise, 
subsequences for each instruction are selected using the 4-bit SQ register and the 2-bit stage 
register (STB2, STB1, where STB2 is the MSB). Some instructions (TC) have only one 
subsequence. At the start of each instruction, the stage counter is initially set to zero. The 


interrupt 

call and 

S£ 

resturn sequences are also stored at SQ = 00. 

STB00 STB01 STB10 

STB 11 

TC/RUPT 

00 

TC0 

RUPT1 

STD2 

RUPT3 

CCS 

01 

CCSO 

CCS1 

.... 

.... 

INDEX 

02 

NDX0 

NDX1 

.... 

RSM 3 

XCH 

03 

04 

05 

06 

07 

10 

XCH 0 

.... 

STD2 

.... 

MP 

11 

MP0 

M PI 

.... 

MP3 

DV 

12 

DVO 

DV 1 

STD2 

.... 

SU 

13 

SUO 

.... 

STD2 

.... 

CS 

14 

CSO 

.... 

STD2 

.... 

TS 

15 

TSO 

.... 

STD2 

.... 

AD 

16 

ADO 

.... 

STD2 

.... 

MASK 

17 

MASKO 

.... 

STD2 

.... 


SELECTING THE CONTROL PULSES 

Each subsequence consists of 12 steps (TP1 - TP12), with each step asserting up to 5 control 
pulses (control logic signals). Steps TP1-TP11 are unique to each subsequence; step TP12 is 
common to all subsequences. Control pulses for TP12 are discussed in CPM-C. 

For some steps, selection of the control pulses is also conditional on the state of the 2-bit 
branch register (BR1 and BR2: BR1 is the MSB and BR2 is the LSB): 

BR00 BR1 = 0, BR2 = 0 
BRO1 BR1=0,BR2=1 

BRIO BR1=1, BR2 = 0 
BR11 BR1= 1, BR2= 1 


Bits 1-6 of the CPM-A EPROM address is formed as follows: 








3-6: register SG (4) 

2: register BR1 (1) 

1: register BR2 (1) 



The column on the far left is the step; columns to the 

right specify the control pulses that are 

asserted for that step. 

Some steps have no control pulses. 


subsequence TCO: 




TP1 

RB 

WY WS 

Cl 

.... 

TP2 





TP3 

WG 

- - 

.... 

.... 

TP4 

RA 

WOVI ---- 

.... 

.... 

TP5 





TP6 





TP7 

RG 

RSC WB 

WP 

.... 

TP8 

RZ 

WQ GP 

TP 

.... 

TP9 

RB 

WSC WG 

.... 

.... 

TP10 

RU 

WZ ---- 

.... 

.... 

TP11 

NISQ 

- - 

.... 

.... 


subsequence CCSO: 





TP1 

RB 

WS 

.... 

.... 

.... 

TP2 

RZ 

WY 

.... 

.... 

.... 

TP3 

WG 

.... 

.... 

.... 

.... 

TP4 






TP5 






TP6 

RG 

RSC 

WB 

TSGN 

WP 

TP7 

BROO, RC 

TMZ 

.... 

.... 

.... 


BRO1, RC 

TMZ 

.... 

.... 

.... 


BRIO, RB 

TMZ 

.... 

.... 

.... 


BR11, RB 

TMZ 

.... 

.... 

.... 

TP8 

BROO, GP 

TP 

.... 

.... 

.... 


BRO 1, R1 

WX 

GP 

TP 

.... 


BRIO, R2 

WX 

GP 

TP 

.... 


BR11, R1 

R2 

WX 

GP 

TP, 

TP9 

RB 

WSC 

WG 

.... 

.... 

TP10 

BROO, RC 

WA 

.... 

.... 

.... 


BRO 1, WA 

R1C 

.... 

.... 

.... 


BRIO, RB 

WA 

.... 

.... 

.... 


BR11, WA 

R1C 

.... 

.... 

.... 

TP11 

RU 

ST 1 

WZ 

.... 

.... 


subsequence CCS1: 

TP1 RZ 

WY 

WS 

Cl 

_ 

TP2 

TP3 

WG 

.... 

.... 

.... 

.... 

TP4 

RU 

WZ 

.... 

.... 

.... 

TP5 

RA 

WY 

Cl 

.... 

.... 

TP6 

TP7 

RG 

RSC 

WB 

WP 

.... 

TP8 

RU 

WB 

GP 

TP 

— 



TP9 

TP10 

RC 

WA 

WOVI 

_ 

TP11 

RG 

RSC 

WB 

NISQ 


subsequence NDXO: 




TP1 

TP2 

RB 

WS 

— 

— 

TP3 

WG 

.... 

.... 

.... 

TP4 

TP5 

TP6 

RA 

WOVI 



TP7 

RG 

RSC 

WB 

WP 

TP8 

GP 

TP 

.... 

.... 

TP9 

RB 

WSC 

WG 

.... 

TP10 

TRSM 

.... 

.... 

.... 

TP11 

ST1 

.... 

.... 

.... 


subsequence NDX1: 




TP1 

TP2 

RZ 

WY 

WS 

Cl 

TP3 

WG 

.... 

.... 

.... 

TP4 

TP5 

RU 

WZ 



TP6 

RB 

WY 

---- 

---- 

TP7 

RG 

RSC 

WB 

WP 

TP8 

RB 

WX 

GP 

TP 

TP9 

TP10 

RB 

WSC 

WG 


TP11 

RU 

WB 

WOVI 

NISQ 


subsequence RSM3: 




TP1 

TP2 

R24 

WS 

— 

— 

TP3 

TP4 

TP5 

TP6 

WG 




TP7 

TP8 

TP9 

TP10 

RG 

WZ 



TP11 

NISQ 

.... 

.... 

.... 


subsequence XCHO: 

TP1 RB 

WS 

_ 

_ 

TP2 

RA 

WP 

.... 

.... 

TP3 

WG 

.... 

.... 

.... 

TP4 

WP2 

.... 

.... 

.... 


TP5 

TP6 



TP7 

RG 

RSC 

WB 

WP, 

.... 

TP8 

GP 

TP 

.... 

.... 

.... 

TP9 

RA 

WSC 

WG 

RP2 

.... 

TP10 

RB 

WA 

WOVI 

.... 

.... 

TP11 

ST2 

.... 

.... 

.... 

.... 


subsequence 

CSO: 





TP1 

RB 

WS 

.... 

.... 

.... 

TP2 






TP3 

WG 

.... 

.... 

.... 

.... 

TP4 






TP5 






TP6 






TP7 

RG 

RSC 

WB 

WP, 

.... 

TP8 

GP 

TP 

.... 

.... 

.... 

TP9 

RB 

WSC 

WG 

.... 

.... 

TP10 

RC 

WA 

WOVI 

.... 

.... 

TP11 

ST2 

.... 

.... 

.... 

.... 


subsequence 

TSO: 





TP1 


RB 

WS 

.... 

.... 

.... 

TP2 


RA 

WB 

TOV 

WP 

.... 

TP3 


WG 

.... 

.... 

.... 

.... 

TP4 

BROO, 

.... 

.... 

.... 

.... 

.... 


BRO1, 

RZ 

WY 

Cl 

.... 

.... 


BRIO, 

RZ 

WY 

Cl 

.... 

.... 


BR11, 

.... 

.... 

.... 

.... 

.... 

TP5 

BROO, 

.... 

.... 

.... 

.... 

.... 


BRO 1, 

R1 

WA 

.... 

.... 

.... 


BRIO, 

WA 

R1C 

.... 

.... 

.... 


BR11, 

.... 

.... 

.... 

.... 

.... 

TP6 







TP7 

BROO, 

.... 

.... 

.... 

.... 

.... 


BRO 1, 

RU 

wz 

.... 

.... 

.... 


BRIO, 

RU 

wz 

.... 

.... 

.... 


BR11, 

.... 

.... 

.... 

.... 

.... 

TP8 


GP 

.... 

.... 

.... 

.... 

TP9 


RB 

WSC 

WG 

.... 

.... 

TP10 


RA 

WOVI 

.... 

.... 

.... 

TP11 


ST2 

.... 

.... 

.... 

.... 

subsequence ADO: 





TP1 


RB 

WS 

.... 

.... 

.... 

TP2 


RA 

WY 

.... 

.... 

.... 

TP3 


WG 

.... 

.... 

.... 

.... 

TP4 







TP5 







TP6 







TP7 


RG 

RSC 

WB 

WP 

.... 

TP8 


RB 

WX 

GP 

TP 

.... 

TP9 

TP10 


RB 

WSC 

WG 

.... 

— 


(overflow) 

(underflow) 



TP11 RU WA WOVC ST2 WOVI 


SUB_MASK0 performs a logical AND using DeMorgan's Theorem : the inputs are inverted, a 
logical OR is performed, and the result is inverted. The implementation of the OR (at TP8) is 
somewhat unorthodox: the inverted inputs are in registers U and C. The OR is achieved by 
gating both registers onto the read/write bus simultaneously. (The bus only transfers logical 
l's; register-to-register transfers are performed by clearing the destination register and then 
transferring the l's from the source register to the destination). When the l's from both 
registers are simultaneously gated onto the bus, the word on the bus is a logical OR of both 
registers. 


subsequence MASKO: 


TP1 

RB 

WS 

.... 

.... 

.... 

TP2 

RA 

WB 

.... 

.... 

.... 

TP3 

WG 

.... 

.... 

.... 

.... 

TP4 

RC 

WY 

.... 

.... 

.... 

TP5 






TP6 






TP7 

RG 

RSC 

WB 

WP 

.... 

TP8 

RU 

RC 

WA 

GP 

TP 

TP9 

TP10 

RA 

WB 

.... 

.... 

.... 

TP11 

RC 

WA 

ST2 

WOVI 

— 


subsequence 

MPO: 





TP1 


RB 

WS 

.... 

.... 

.... 

TP2 


RA 

WB 

TSGN 

.... 

.... 

TP3 


RSC 

WG 

.... 

.... 

.... 

TP4 

BROO, 

RB 

WLP 

.... 

.... 

.... 


BRO1, 

RB 

WLP 

.... 

.... 

.... 


BRIO, 

RC 

WLP 

.... 

.... 

.... 


BR11, 

RC 

WLP 

.... 

.... 

.... 

TP5 


RLP 

WA 

.... 

.... 

.... 

TP6 







TP7 

BROO, 

RG 

WY 

WP 

.... 

.... 


BRO 1, 

RG 

WY 

WP 

.... 

.... 


BRIO, 

RG 

WB 

WP 

.... 

.... 


BR11, 

RG 

WB 

WP 

.... 

.... 

TP8 

BROO, 

GP 

TP 

.... 

.... 

.... 


BRO 1, 

GP 

TP 

.... 

.... 

.... 


BRIO, 

RC 

WY 

GP 

TP 

.... 


BR11, 

RC 

WY 

GP 

TP 

.... 

TP9 


RU 

WB 

TSGN2 

.... 


TP10 

BROO, 

RA 

WLP 

TSGN 

.... 

.... 


BRO 1, 

RA 

RB14 

WLP 

TSGN 

.... 


BRIO, 

RA 

WLP 

TSGN 

.... 

.... 


BR11, 

RA 

RB14 

WLP 

TSGN 

.... 

TP11 

BROO, 

ST1 

WALP 

.... 

.... 

.... 


BRO 1, 

R1 

ST1 

WALP 

R1C 

.... 


BRIO, 

RU 

ST1 

WALP 

.... 

.... 


BR11, 

RU 

ST1 

WALP 

.... 

.... 



subsequence 

TP1 

MP1: 

RA 

WY 

_ 

_ 

_ 

TP2 


RLP 

WA 

TSGN 

.... 

.... 

TP3 

BROO, 

.... 

.... 

.... 

.... 

.... 


BRO1, 

.... 

.... 

.... 

.... 

.... 


BRIO, 

RB 

WX 

.... 

.... 

.... 


BR11, 

RB 

wx 

.... 

.... 

.... 

TP4 


RA 

WLP 

.... 

.... 

.... 

TP5 


RLP 

TSGN 

.... 

.... 

.... 

TP6 


RU 

WALP 

.... 

.... 

.... 

TP7 


RA 

WY 

.... 

.... 

.... 

TP8 

BROO, 

.... 

.... 

.... 

.... 

.... 


BRO 1, 

.... 

.... 

.... 

.... 

.... 


BRIO, 

RB 

WX 

.... 

.... 

.... 


BR11, 

RB 

wx 

.... 

.... 

.... 

TP9 


RLP 

WA 

.... 

.... 

.... 

TP10 


RA 

WLP 

CTR 

.... 

.... 

TP11 


RU 

ST1 

WALP 

.... 

.... 


subsequence MP3: 





TP1 

RZ 

WY 

WS 

Cl 

.... 

TP2 

RLP 

TSGN 

.... 

.... 

.... 

TP3 

WG 

.... 

.... 

.... 

.... 

TP4 

RU 

WZ 

.... 

.... 

.... 

TP5 

RA 

WY 

.... 

.... 

.... 

TP6 

BROO, ---- 

.... 

.... 

.... 

.... 


BRO 1, ---- 

.... 

.... 

.... 

.... 


BRIO, RB 

WX 

.... 

.... 

.... 


BR11, RB 

wx 

.... 

.... 

.... 

TP7 

RG 

RSC 

WB 

WP 

.... 

TP8 

RLP 

WA 

GP 

TP 

.... 

TP9 

RB 

WSC 

WG 

.... 

.... 

TP10 

RA 

WLP 

.... 

.... 

.... 

TP11 

RU 

WALP 

NISQ 

.... 

.... 


subsequence 

TP1 

DVO: 

RB 

WS 

_ 

_ 

_ 

TP2 


RA 

WB 

TSGN 

.... 

.... 

TP3 


RSC 

WG 


.... 

.... 

TP4 

BROO, 

RC 

WA 

.... 

.... 

.... 


BRO 1, 

RC 

WA 

.... 

.... 

.... 


BRIO, 

.... 

.... 

.... 

.... 

.... 


BR11, 

.... 

.... 

.... 

.... 

.... 

TP5 

BROO, 

R1 

WLP 

.... 

.... 

.... 


BRO 1, 

R1 

WLP 

.... 

.... 

.... 


BRIO, 

R2 

WLP 

.... 

.... 

.... 


BR11, 

R2 

WLP 

.... 

.... 

.... 

TP6 


RA 

WQ 

.... 

.... 

.... 

TP7 


RG 

WB 

TSGN 

WP 

.... 

TP8 


RB 

WA 

GP 

TP 

.... 

TP9 

BROO, 

RLP 

R2 

WB 

.... 

.... 




BRO1, 

RLP 

R2 

WB 

.... 

.... 


BRIO, 

.... 

.... 

.... 

.... 

.... 


BR11, 

.... 

.... 

.... 

.... 

.... 

TP10 

BROO, 

RB 

WLP 

.... 

.... 

.... 


BRO 1, 

RB 

WLP 

.... 

.... 

.... 


BRIO, 

RC 

WA 

.... 

.... 

.... 


BR11, 

RC 

WA 

.... 

.... 

.... 

TP11 


R1 

ST1 

WB 

.... 

.... 


subsequence 

DV1: 





TP1 


R22 

WS 

.... 

.... 

.... 

TP2 


RQ 

WG 

.... 

.... 

.... 

TP3 


RG 

WQ 

WY 

RSB 

.... 

TP4 


RA 

WX 

.... 

.... 

.... 

TP5 


RLP 

TSGN2 

.... 


.... 

TP6 







TP7 


RU 

TSGN 

.... 

.... 

.... 

TP8 

BROO, 

.... 

.... 

.... 

.... 

.... 


BRO 1, 

.... 

.... 

.... 

.... 

.... 


BRIO, 

RU 

WQ 

.... 

.... 

.... 


BR11, 

RU 

WQ 

.... 

.... 

.... 

TP9 

BROO, 

RB 

RSB 

WG 

.... 

.... 


BRO 1, 

RB 

RSB 

WG 

.... 

.... 


BRIO, 

RB 

WG 

.... 

.... 

.... 


BR11, 

RB 

WG 

.... 

.... 

.... 

TPIO 


RG 

WB 

TSGN 

.... 

.... 

TP11 

BROO, 

ST1 

.... 

.... 

.... 

.... 


BRO 1, 

ST1 

.... 

.... 

.... 

.... 


BRIO, 

RC 

WA 

ST2 

.... 

.... 


BR11, 

RB 

WA 

ST2 

.... 

.... 


subsequence 

SUO: 





TP1 

RB 

WS 

.... 

.... 

.... 

TP2 

RA 

WY 

.... 

.... 

.... 

TP3 

WG 

.... 

.... 

.... 

.... 

TP4 






TP5 






TP6 






TP7 

RG 

RSC 

WB 

WP 

.... 

TP8 

RC 

WX 

GP 

TP 

.... 

TP9 

RB 

WSC 

WG 

.... 

.... 

TPIO 

TP11 

RU 

WA 

wove 

ST2 

WO' 


subsequence RUPT1: 

TP1 R24 

WY 

WS 

Cl, 

_ 

TP2 

TP3 WG 






TP4 

TP5 

TP6 



TP7 

TP8 


TP9 

RZ 

WG 

.... 

.... 

.... 

TP10 

RU 

WZ 

.... 

.... 

.... 

TP11 

ST1 

ST2 

.... 

.... 

.... 


subsequence RUPT3: 

TP1 RZ 

WS 

_ 

_ 

_ 

TP2 

RRPA 

WZ 

.... 

.... 

.... 

TP3 

RZ 

KRPT 

WG 

.... 

.... 

TP4 

TP5 

TP6 

TP7 

TP8 

TP9 

RB 

wsc 

WG 



TP10 

TP11 

ST2 






subsequence STD2: 

TP1 RZ 

WY 

WS 

Cl, 

_ 

TP2 

TP3 

WG 

.... 

.... 

.... 

.... 

TP4 

RU 

WZ 

.... 

.... 

.... 

TP5 

TP6 

TP7 

RG 

RSC 

WB 

WP 


TP8 

GP 

TP 

.... 

.... 

.... 

TP9 

RB 

WSC 

WG 

.... 

.... 

TP10 

TP11 

NISQ 

_ 

_ 

_ 

_ 


subsequence PINC: 

TP1 WS 

RSCT 

_ 

_ 

_ 

TP2 

TP3 

WG 

.... 

.... 

.... 

.... 

TP4 

R1 

WY 

.... 

.... 

.... 

TP5 

TP6 

RG 

WX 

WP 

.... 

.... 

TP7 

TP 

.... 

.... 

.... 

.... 

TP8 

WP 

.... 

.... 

.... 

.... 

TP9 

RU 

CLG 

WPx 

.... 

.... 

TP10 

RU 

WGx 

WOVR 

.... 

.... 

TP11 

subsequence MINC: 

TP1 WS, 

RSCT 




TP2 

TP3 

WG 

.... 

.... 

.... 

.... 

TP4 

WY 

R1C 

— 

— 

— 



TP5 




TP6 

RG 

WX 

WP 

TP7 

TP 

.... 

.... 

TP8 

WP 

.... 

.... 

TP9 

RU 

CLG 

WPx 

TP10 

TP11 

RU 

WGx 

WOVR 



Here's some of the analysis used to develop the instruction sequence decoder. This decoder 
takes in the STB and SQ inputs and decodes the instruction sequence for display to the 
operator. 
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CONTROL SIGNAL DEFINITIONS 


SIGNAL 

#_ 

DESCRIPTION 

Cl 

1 

Carry in 

CLG 

2 

Clear G 

CLCTR 

3 

Clear loop counter 

CTR 

4 

Loop counter 

GP 

5 

Generate Parity 

KRPT 

6 

Knock down Rupt priority 

NISQ 

7 

New instruction to the SQ register 

RA 

8 

Read A 

RB 

9 

Read B 

RB14 

10 

Read bit 14 

RC 

11 

Read C 

RG 

12 

Read G 

RLP 

13 

Read LP 

RP2 

14 

Read parity 2 

RQ 

15 

Read Q 

RRPA 

16 

Read RUPT address 

RSB 

17 

Read sign bit 

RSCT 

18 

Read selected counter address 

RU 

19 

Read sum 

RZ 

20 

Read Z 

R1 

21 

Read 1 

R1C 

22 

Read 1 complimented 

R2 

23 

Read 2 

R22 

24 

Read 22 

R24 

25 

Read 24 

ST1 

26 

Stage 1 

ST2 

27 

Stage 2 

TMZ 

28 

Test for minus zero 

TOV 

29 

Test for overflow 

TP 

30 

Test parity 

TRSM 

31 

Test for resume 

TSGN 

32 

Test sign 

TSGN2 

33 

Test sign 2 

WA 

34 

Write A 

WALP 

35 

Write A and LP 

WB 

36 

Write B 

Wgx 

37 

Write G (do not reset) 

WLP 

38 

Write LP 

wove 

39 

Write overflow counter 

WOVI 

40 

Write overflow RUPT inhibit 

WOVR 

41 

Write overflow 

WP 

42 

Write P 

Wpx 

43 

Write P (do not reset) 

WP2 

44 

Write P2 

WQ 

45 

Write Q 

WS 

46 

Write S 

WX 

47 

Write X 

WY 

48 

Write Y 

Wyx 

49 

Write Y (do not reset) 



WZ 50 Write Z 

Control signal outputs from CPM-A used as inputs to CPM-B only (not used outside of CPM): 
SIGNAL £ DESCRIPTION 

RSC 51 Read special and central (output to B only, not outside CPM) 

WSC 52 Write special and central (output to B only, not outside CPM) 

WG 53 Write G (output to B only, not outside CPM) 

Control signal outputs from CPM-A used as inputs to CPM-C only (not used outside of CPM): 
SIGNAL £ DESCRIPTION 

SDV1 54 Subsequence DV1 is currently active 

SMP1 55 Subsequence MP1 is currently active 

SRSM3 56 Subsequence RSM3 is currently active 



CPM-A INPUTS 


I/F signal 
TPG: 

TPG_Q3 

TPG_Q2 
TPG_Q1 
TPG_QO 


SEQ: 

BR1 

BR2 


SQ_3 

SQ_2 

SQ_1 

SQ_0 


STB_1 

STB_0 

L00P6 


full name 
TPG STATE 


BRANCH REG 1 
BRANCH REG 2 

INST REG 


STAGE REG 

LOOPCNTR EQ 6 


state definition 


where Q3 is MSB, QO is 
LSB: 

00 = STBY 
01 = PWRON 
02 = TP1 
03 = TP2 
04 = TP3 
05 = TP4 
06 = TP5 
07 = TP6 
08 = TP7 
09 = TP8 

10 = TP9 

11 = TP10 

12 = TP11 

13 = TP12 

14 = SRLSE 

15 = WAIT 


BR1 is MSB, BR2 is LSB 
BR00 = 0:BR1 = 0, BR2 = 0 
BR01 = 1:BR1 = 0, BR2=1 
BR10 = 2:BR1=1, BR2 = 0 
BR11 = 3:BR1=1, BR2=1 

where SQ_3 is MSB, 
SQ_0 is LSB 


where STB_1 is MSB, 
STB_0 is LSB 


0 = LOOPCNTR is holding 
the number 6. 


TG3 

TG2 

TGI 

TGO 


RC 
RG 
RIF 
RF2 
RQ 
3R1 RRPA 
3R2 RS3 
7311 
SQ3 RU 
SQ2 RZ 
SQ1 R1 
SQ0 R1C 


CPMA 

Cl 

CLG 

CLCTR 

CTR 

GP 

KRPT 

NISQ 

RA 

R3 

R314 


R2 
R22 
R2 4 
ST1 
ST2 
TMZ 
TOY 
TP 
TRSM 
TSGN 
TSGN2 
WA 
WALP 
JNRUN W3 
WGX 
WLP 
S32 WOVC 
S31 WOVI 
WOVR 
WP 
WPX 
WP2 
WQ 
WS 
wx 
WY 
WYX 
WZ 


ST31 
ST30 

LOP 6 
SNI 

-OlRQ 


-0 


RSC o- 
WSC 0- 
WG O- 


SDV1 

3MP1 

SRSM3 


O- 

o- 

CJ- 

o- 

O- 

3- 

O- 

CJ- 

O- 

t>- 

O- 

O- 

O- 

o- 

0- 

O- 

O- 

C>- 

o- 

o— 

o- 

o- 

o- 

o- 

o- 

o- 

o- 

o- 

o- 

o- 

O— 

o- 

o- 

o- 

o- 

o- 

o- 

o- 

o- 

o- 

o- 

o- 

o- 

o- 

o- 

o- 

o- 

o- 


o- 

o- 

o- 


SNI SELECT NEXT INST 1 = select next instruction (SNI register) 


CTR: 


SB_01 

SB_02 


SB_01 is LSB; SB_02 is MSB 

00 = no counter; 01 = PINC; 10 = MINC 


INT: 


SUB SEL 01 
SUB SEL 02 






IRQ INTRQST 

MON: 

NRUN RUN/HALT 


CPM-A OUTPUTS: 


siqnal 

full name 

Cl 

SET CARRY IN 

CLG 

CLR G 

CLCTR 

CLR LOOP CTR 

CTR 

INCR LOOP CTR 

GP 

GEN PARITY 

KRPT 

KNOCK DOWN RUPT 

NISQ 

NEW INSTRUCT 

RA 

READ A 

RB 

READ B 

RB14 

READ BIT 14 

RC 

READ C 

RG 

READ G 

RLP 

READ LP 

RP2 

READ PARITY 2 

RQ 

READ Q 

RRPA 

READ RUPT ADDR 

RSB 

READ SIGN 

RSCT 

READ CNTR ADDR 

RU 

READ U 

RZ 

READ Z 

R1 

READ 1 

R1C 

READ 1 COMP 

R2 

READ 2 

R22 

READ 22 

R24 

READ 24 

ST 1 

SET STAGE 1 

ST2 

SET STAGE 2 

TMZ 

TEST MINUS ZERO 

TOV 

TEST OVF 

TP 

TEST PARITY 

TRSM 

TEST RESUME 

TSGN 

TEST SIGN 

TSGN2 

TEST SIGN 2 

WA 

WRITE A 

WALP 

WRITE A/LP 

WB 

WRITE B 

WGx 

WRITE G NO RESET 

WLP 

WRITE LP 

wove 

WRITE OVF CNTR 

WOVI 

WRITE OVF RUPT IN 

WOVR 

WRITE OVF 

WP 

WRITE P 

WPx 

WRITE P NO RESET 

WP2 

WRITE P2 


0 = interrupt requested. 


0 = run, l = step 


state definition 
0 = Carry in 
0= Clear G 

0 = Clear loop counter 

0 = Loop counter 

0 = Generate Parity 

0 = Knock down Rupt priority 

0 = New instruction to the SQ reg 

0 = Read A 

0 = Read B 

0 = Read bit 14 

0 = Read C 

0 = Read G 

0 = Read LP 

0 = Read parity 2 

0 = Read Q 

0 = Read RUPT address 
0 = Read sign bit 

0 = Read selected counter address 
0 = Read sum 
0 = Read Z 
0 = Read 1 

0 = Read 1 complimented 
0 = Read 2 
0 = Read 22 
0 = Read 24 
0 = Stage 1 
0 = Stage 2 

0 = Test for minus zero 
0=Test for overflow 
0 = Test parity 
0 = Test for resume 
0=Test sign 
0 = Test sign 2 
0 = Write A 
0 = Write A and LP 
0 = Write B 

0 = Write G (do not reset) 

0 = Write LP 

0 = Write overflow counter 
H 0 = Write overflow RUPT inhibit 

0 = Write overflow 
0 = Write P 

0 = Write P (do not reset) 

0 = Write P2 



WQ 

WRITE Q 

0 = Write Q 

WS 

WRITE S 

0 = Write S 

WX 

WRITE X 

0 = Write X 

WY 

WRITE Y 

0 = Write Y 

WYx 

WRITE Y NO RESET 

0 = Write Y (do not reset) 

WZ 

WRITE Z 

0 = Write Z 

OUTPUTS TO CPM-B ONLY; NOT USED 

OUTSIDE CPM 

RSC 

READ SPECIAL REG 

0 = Read special and central 

wsc 

WRITE SPECIAL REG 

0 = Write special and central 

WG 

WRITE G 

0 = Write G 

OUTPUTS TO CPM-C ONLY; NOT USED 

OUTSIDE CPM 

SDV1 

SUBSEQ DV1 

0 = Subsequence DV1 is selected 

SMP1 

SUBSEQ M PI 

0 = Subsequence MP1 is selected 

SRSM3 

SUBSEQ RSM3 

0 = Subsequence RSM3 is selected 




ccannoL ptl5e matrix a 
(cai-A) *i 
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CPM-B (Control Pulse Matrix B) 

Some AGC registers are mapped onto low memory addresses (00 - 17 octal), so reading or 
writing to those addresses causes data to be read from, or written into, flip-flop registers 
instead of memory. These addresses include the central registers (A, Q, Z, LP), the bank 
register (BNK), and I/O registers. 

Addresses 16 and 17 are used in conjunction with the INDEX instruction to inhibit or enable 
interrupts; this is a trick used to extend the instruction set; to cram more instructions into a 
3-bit op code. 

The addresses from 20-23 are in eraseable memory, but any data written into those 
addresses is rotated or shifted. This is implemented through the G register in the MEM 
module. 

Addresses 24-27 are reserved for saving the central register before servicing an interrupt. 
Registers Z and B are automatically saved by the interrupt subsequence. Registers A and Q 
must be saved by the interrupt service routine. 


SPECIAL REGISTERS 

These addresses called special registers. All numbers are in octal. 


addr 

Flip-Flop registers 

00 

A 

register (accumulator) 

01 

Q 

register 

02 

Z 

register (program counter) 

03 

LP 

register 

04 

IN0 

input register 0 

05 

INI 

input register 1 

06 

IN 2 

input register 2 

07 

IN 3 

input register 3 

10 

OUTO 

output register 0 

11 

OUT 1 

output register 1 

12 

OUT2 

output register 2 

13 

OUT3 

output register 3 

14 

OUT4 

output register 4 

15 

BANK 

bank register 

16 

RELINT 

17 

INHINT 


Eraseable memory registers 

20 

CYR 

cycle right 

21 

SR 

shift right 

22 

CYL 

cycle left 

23 

SL 

shift left 

24 

ZRUPT 

save register Z 

25 

BRUPT 

save register B 

26 

ARUPT 

save register A 

27 

QRUPT 

save register Q 



CPM-B translates the WG, RSC, and WSC signals generated by SUBSYSTEM A into signals 
that read from or write to these registers. The logic is given below (all numbers are in octal) 


if WG is asserted from CPM-A, 


. ..and 
. ..and 
. ..and 
. ..and 


the address bus 
the address bus 
the address bus 
the address bus 


020 

021 

022 

023 


assert: W20 
assert: W21 
assert: W22 
assert: W23 


...otherwise, if the address bus > 17: assert:WGn 


(not a central register) 


RSC 

is asserted from 

CPM - 

4 


and 

the 

address 

bus 

= 

00 


assert:RAO 

and 

the 

address 

bus 

= 

01 


assert:RAl 

and 

the 

address 

bus 

= 

02 


assert:RA2 

and 

the 

address 

bus 

= 

03 


assert:RA3 

and 

the 

address 

bus 

= 

04 


assert:RA4 

and 

the 

address 

bus 

= 

05 


assert:RA5 

and 

the 

address 

bus 

= 

06 


assert:RA6 

and 

the 

address 

bus 

= 

07 


assert:RA7 

and 

the 

address 

bus 

= 

010 

assert: RA10 

and 

the 

address 

bus 

= 

Oil 

assert: RA11 

and 

the 

address 

bus 

= 

012 

assert: RA12 

and 

the 

address 

bus 

= 

013 

assert: RA13 

and 

the 

address 

bus 

= 

014 

assert: RA14 

and 

the 

address 

bus 

= 

015 

assert:RBK 

and 

the 

address 

bus 

= 

016 

do nothing 

and 

the 

address 

bus 

= 

017 

do nothing 


WSC is asserted 

from 

CPM-A, 

and 

the 

address 

bus 

= 

00: 

assert: WAO 

and 

the 

address 

bus 

= 

01: 

assert: WA1 

and 

the 

address 

bus 

= 

02: 

assert: WA2 

and 

the 

address 

bus 

= 

03: 

assert: WA3 

and 

the 

address 

bus 

= 

010 

assert: WA10 

and 

the 

address 

bus 

= 

Oil 

assert: WA11 

and 

the 

address 

bus 

= 

012 

assert: WA12 

and 

the 

address 

bus 

= 

013 

assert: WA13 

and 

the 

address 

bus 

= 

014 

assert: WA14 

and 

the 

address 

bus 

= 

015 

assert: WBK 

and 

the 

address 

bus 

= 

016 

do nothing 

and 

the 

address 

bus 

= 

017 

do nothing 












Here's a table I developed to work out the relationships between addresses and CPM-B logic 
signals: 
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CPM-B CONTROL SIGNALS 


SIGNAL 

#_ 

DESCRIPTION 

RAO 

57 

Read register at address 0 (A) 

RA1 

58 

Read register at address 1 (Q) 

RA2 

59 

Read register at address 2 (Z) 

RA3 

60 

Read register at address 3 (LP) 

RA4 

61 

Read register at address 4 

RA5 

62 

Read register at address 5 

RA6 

63 

Read register at address 6 

RA7 

64 

Read register at address 7 

RA10 

65 

Read register at address 10 (octal) 

RA11 

66 

Read register at address 11 (octal) 

RA12 

67 

Read register at address 12 (octal) 

RA13 

68 

Read register at address 13 (octal) 

RA14 

69 

Read register at address 14 (octal) 

RBK 

70 

Read BNK 

WAO 

71 

Write register at address 0 (A) 

WA1 

72 

Write register at address 1 (Q) 

WA2 

73 

Write register at address 2 (Z) 

WA3 

74 

Write register at address 3 (LP) 

WA10 

75 

Write register at address 10 (octal) 

WA11 

76 

Write register at address 11 (octal) 

WA12 

77 

Write register at address 12 (octal) 

WA13 

78 

Write register at address 13 (octal) 

WA14 

79 

Write register at address 14 (octal) 

WBK 

80 

Write BNK 

WGn 

81 

Write G (normal gates) 

W20 

82 

Write into CYR 

W21 

83 

Write into SR 

W22 

84 

Write into CYL 

W23 

85 

Write into SL 



CPM-BINPUTS 


IZE 

CPM-A 

ADR: 


CPM 

IZE 


signal 


full name 


state definition 


RSC 

WSC 

WG 


AD_4 

AD_3 

AD_2 

AD_1 

GTR_17 

GTR 27 


READ SPECIAL REG 
WRITE SPECIAL REG 
WRITE G 


ADDRESS 


0 = Read special and central 
0 = Write special and central 
0 = Write G 


ADDRESS > 017 
ADDRESS > 027 


■B OUTPUTS: 


AD_4 = MSB, AD_1 = LSB : 
(low-order bits of 14-bit 
address) 


0 = CADR in register S > 
017 

0 = CADR in register S > 
027 


-0 

-0 

-o 


CPM3 
RSC RAO 


WSC 

WG 


-AD4 

-AD3 


RA 

RA2 

RA3 

RA4 

RA5 

RA6 

RA' 


-O 

-o 


AD2 RA10 
ADI RA11 
RA12 
RA13 
RA14 
GR17 RBK 
GR27 WAO 
WA1 
WA2 
WA3 
WAIO 
WA11 
WA12 
WA13 
WA14 
WBK 
WGN 
W20 
W21 
W22 
W23 


siqnal 

full name 

state definition 

RAO 

READ ADDR 0 

0 = Read reg at address 0 

RA1 

(A) 

READ ADDR 1 

0 = Read reg at address 1 (Q) 

RA2 

READ ADDR 2 

0 = Read reg at address 2 (Z) 

RA3 

READ ADDR 3 

0 = Read reg at address 3 (LP) 

RA4 

READ ADDR 4 

0 = Read reg at address 4 

RA5 

READ ADDR 5 

0 = Read reg at address 5 

RA6 

READ ADDR 6 

0 = Read reg at address 6 

RA7 

READ ADDR 7 

0 = Read reg at address 7 

RA10 

READ ADDR 10 

0 = Read reg at address 10 (octal) 

RA11 

READ ADDR 11 

0 = Read reg at address 11 (octal) 

RA12 

READ ADDR 12 

0 = Read reg at address 12 (octal) 

RA13 

READ ADDR 13 

0 = Read reg at address 13 (octal) 

RA14 

READ ADDR 14 

0 = Read reg at address 14 (octal) 

RBK 

READ BNK 

0 = Read BNK reg 

WAO 

WRITE ADDR 0 

0 = Write reg at address 0 (A) 

WA1 

WRITE ADDR 1 

0 = Write reg at address 1 (Q) 

WA2 

WRITE ADDR 2 

0 = Write reg at address 2 (Z) 

WA3 

WRITE ADDR 3 

0 = Write reg at address 3 (LP) 

WAIO 

WRITE ADDR 10 

0 = Write reg at address 10 (octal) 

WA11 

WRITE ADDR 11 

0 = Write reg at address 11 (octal) 

WA12 

WRITE ADDR 12 

0 = Write reg at address 12 (octal) 

WA13 

WRITE ADDR 13 

0 = Write reg at address 13 (octal) 

WA14 

WRITE ADDR 14 

0 = Write reg at address 14 (octal) 

WBK 

WRITE BNK 

0 = Write BNK reg 


o- 

0 - 

0 - 

o- 

o- 

o- 

0- 

0- 

o- 

0- 

0 - 

0 - 

0 - 

o- 

0 - 

o- 

o- 

0 - 

0 - 

o- 

o- 

c^- 

o- 

0 - 

0 - 

o- 

0 - 









WGn 

WRITE G NORMAL 

0 = Write G (normal gates) 

W20 

WRITE ADDR 20 

0 = Write into CYR 

W21 

WRITE ADDR 21 

0 = Write into SR 

W22 

WRITE ADDR 22 

0 = Write into CYL 

W23 

WRITE ADDR 23 

0 = Write into SL 



CPM3 

CONTROL 

BUS 





































































CPM-C (Control Pulse Matrix C) 

The CPM-C subsystem issues control signals for the memory cycle, selecting the next 

instruction, and performing priority counter subsequences. These signals are issued at 

specific points in the 12-step cycle of the time pulse generator (TPG). 

STBY: assert:GENRST Resets various AGC registers. 

PWRON: assert:R2000 Put the starting address on the read bus. 

CPM-A asserts:WB, which copies the data 
into register B, which is the prefetch 
register for the next instruction. Since the 
opcode for a branch is 0, the instruction in 
B becomes TC 2000, which is the first 
instruction always executed by the AGC. 

TP1: assert:CLISQ SNI <- 0. Moved from TP12 to TP1 because 

CLISQ was getting cleared in this hardware 
AGC replica before TPG was clocked; 
therefore TPG was not seeing the SNI 
indication. 

TP5: if: the address bus > 17 (not a central register) 

and the address bus < 2000 (not fixed memory; must be erasable) 

and SDV1 or SMP1 are not asserted (not a loop counter subsequence) 

then: assert:SBWG read erasable memory into G by TP6 

if: the address bus = 17 

then: assert:INH INHINT instruction (INDEX 017) 

if: the address bus = 16 

then: assert:CLINH RELINT instruction (INDEX 016) 


TP6: if: the address bus > 1777 (not eraseable memory) 

and SDV1 or SMP1 are not asserted (not a loop counter subsequence) 

then: assert:SBWG read fixed memory into G register by TP7 


TP11: if: the address bus > 17 

and the address bus < 2000 

and SDV1 or SMP1 are not asserted 

then: assert:WE 


if: SRSM3 is asserted 

then: assert:CLRP 


(not a central register) 

(not fixed memory; must be erasable) 

(not a loop counter subsequence) 

G register written to memory beginning at 
TP11; Memory updates are in G by TP10 
for all normal and extracode instructions, 
but the PINC and MINC sequences write to 
G in TP10 because they need to update the 
parity bit. 

Additional interrupts are inhibited during 
servicing of an interrupt; Remove the 
inhibition when RESUME is executed 
(INDEX 025) 



TP12: assert:WPCTR 


if: the SNI register = 1 

then: 

if: IRQ is asserted 

then: 

assert: RPT 
assert:SETSTB 

else: 

assert:CLSTB 


end if 

assert:WSQ 

assert:CLSTA 


assert:CLINH 1 


else: 

if: CTROO or CTR11 


then: 

assert: WSTB 
assert:CLSTA 


Check the priority counters; service any 
waiting inputs on the next memory cycle. 

(if SNI is set, get next instruction) 

(if interrupt requested (see CPM-A for 
similar assertion)) 

Read the interrupt vector. 

STB <- 1. Will cause the RUPT1 
subsequence to execute. 

(notan interrupt; a normal instruction) 

STB <- 0 . The CPM-A will assert RB here, 
which, when accompanied by WSQ 
(below), will read the next instruction from 
register B onto the bus. WSQ will write it 
into SQ. 

Write the next instruction (on the write 
bus) into the SQ register. 

Clear STA register. 


Clear INHINT1. Removes inhibition of 
interrupts (if they were) AFTER the next 
instruction 

(not a new instruction) 
if previous sequence was not a PINC or 
MINC, get next subsequence for same 
instruction, if the previous sequence was 
PINC or MINC, we already have the 
subsequence, but it was interrupted by the 
counter. 

Copy STB <- STA. Gets next sequence for 
same instruction. 

STA <- 0 



. bJPUTS 


This truth table shows the logic 
needed at TP12 to produce the 
RPT, SETSTB, CLSTB, CLSTA, 
WSQ, WSTB, CLISQ, and CLINH1 
signals, given the SNI, IRQ, 
NRUN, and SB inputs. 
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This chart shows the logic for 
some of the more simple 
control pulses generated by 
CMP-C. Some pulses reduce to 
states from the TPG, such as 
CLISQ, WPCTR, and CLIN HI, 
which reduce to TP12. 










































































This is the logic for RPT and 


The design for CLSTB is a 
little more complex. The 
truth table to the left is 
reduced through the 
Karnaugh map to the 
Minterm equation below 
the map. A little bubble 
pushing DeMorganizes 
the logic to the final 
solution at the bottom 
right. 






































































































































This is the logic for 
WE and SBWG, two 
signals that control 
memory access. 






























































































CPM-C CONTROL SIGNALS 


SIGNAL 

£ 

DESCRIPTION 

GENRST 

86 

General Reset 

CLIN H 

87 

Clear INHINT 

CLIN H 1 

88 

Clear INHINT1 


CLSTA 

89 

Clear state counter A (STA) 

CLSTB 

90 

Clear state counter B (STB) 

CLISQ 

91 

Clear SNI 

CLRP 

92 

Clear RPCELL 

INH 

93 

Set INHINT 

RPT 

94 

Read RUPT opcode 

SBWG 

95 

Write G from memory 

SETSTB 

96 

Set the ST1 bit of STB 

WE 

97 

Write E-MEM from G 


WPCTR 

98 

Write PCTR (latch priority counter sequence) 

WSQ 

99 

Write SQ 

WSTB 

100 

Write stage counter B (STB) 

R2000 

101 

Read 2000 



CPM INPUTS 


I/F signal full name 

TPG: 

TPG_Q3 TPG STATE 

TPG_Q2 
TPG_Q1 
TPG_QO 


state definition 


where Q3 is MSB, QO is 
LSB: 

00 = STBY 
01 = PWRON 
02 = TP1 
03 = TP2 
04 = TP3 
05 = TP4 
06 = TP5 
07 = TP6 
08 = TP7 
09 = TP8 

10 = TP9 

11 = TP10 

12 = TP11 

13 = TP12 

14 = SRLSE 

15 = WAIT 


—og: 

-o 

-o 


-O 

—c 
~c 


CPMC 
TG3 RST 
TG2 CLH 
TGI CL HI 
TG0 C5TA 
CST3 
GR17 CIQ 
R1777 
EQ16 CRP 
EQ17 INH 
RPT 
IRQ SBWG 
5ST3 
SNI WE 
WPCT 
SDV1 
SMP1 WSQ 
SRSM3 
WST3 
INRUN 
R2000 
S32 
S31 


ADR: 

EQU_16 

EQU_17 

GTR_17 

GTR_1777 


ADDRESS = 016 
ADDRESS = 017 
ADDRESS > 017 
ADDRESS > 01777 


0 = CADR in register S = 016 
0 = CADR in register S = 017 
0 = CADR in register S > 017 
0 = CADR in register S > 01777 


CPM-A: 

SDV1 

SMP1 

SRSM3 


SUBSEQ DV1 
SUBSEQ M PI 
SUBSEQ RSM3 


0 = Subsequence DV1 is selected 
0 = Subsequence MP1 is selected 
0 = Subsequence RSM3 is selected 


CTR: 



SB_01 

SB_02 

SUB SEL 01 

SUB SEL 02 

SB_01 is LSB; SB_02 is MSB 

00 = no counter; 01 = PINC; 10 = MINC 

SEQ: 

SNI 

SELECT NEXT INST 

l = select next instruction (SNI register) 

INT: 

IRQ 

INT RQST 

0 = interrupt requested. 

MON: 

NRUN 

RUN/HALT 

0 = run, l = step 


v ? v mvm mm 






CPM OUTPUTS 


IZE 


siqnal 

full name 

GENRST 

GENERAL RESET 

CLIN H 

CLEAR INHINT 

CLIN H 1 

CLEAR INHINT1 

CLSTA 

CLEAR STA 

CLSTB 

CLEAR STB 

CLISQ 

CLEAR SNI 

CLRP 

CLEAR RPCELL 

INH 

SET INHINT 

RPT 

READ RUPT 

SBWG 

WRITE G 

SETSTB 

SET ST1 

WE 

WRITE EMEM 

WPCTR 

WRITE PCTR 

WSQ 

WRITE SQ 

WSTB 

WRITE STB 

R2000 

READ 2000 


state definition 
0 = General Reset 
0 = Clear INHINT 
0 = Clear INHINT1 
0 = Clear state counter A (STA) 

0 = Clear state counter B (STB) 

0 = Clear SNI 

0 = Clear RPCELL 

0 = Set INHINT 

0 = Read RUPT opcode 

0=Write G from memory 

0 = Set the ST1 bit of STB 

0 = Write E-MEM from G 

0 = Write PCTR (latch priority counter 

sequence) 

0 = Write SQ 

0 = Write stage counter B (STB) 

0 = Read 2000 



CPM-C 

CONTROL 



(CPM-C) #1 
























































































































Fabrication 


The CTL module is (3) 13"x5" circuit boards, and 1 control panel. 

Module Rack 

The module framework is designed to resemble a relay rack, but scaled to fit the circuit 
board dimensions. It is constructed out of l"x2" pine and spray-painted semi-gloss gray. 

Circuit boards are mounted to the rack by 2 phillips screws at either end. Nylon spacers 
(1/4") are used as standoffs to hold the board edges above the rack. The boards are 
mounted so the chips are in the back and the pins are wiring are visible from the front. 

Power is distributed by 2 heavy aluminum bus bars mounted vertically, one per side, on the 
back of the module. Machine screws are mounted through the bus bars at evenly-spaced 
intervals to provide connection points for the boards. 

Solid copper wire (24 gauge) connects the boards to the bus bars. Ring terminals are used 
on the bus bar side of the connection. On the circuit board size, the wires are soldered 
directly to the supply rails. 

Materials were purchased from Home Depot, ACE Hardware, and Radio Shack. 

Circuit Boards 

The circuit boards are 13"x5" general purpose prototyping boards, epoxy glass with double¬ 
side plated through pads on 0.1" centers (JAMECO 21477CL). 

ICs are mounted in level 3 machine tooled wire-wrap sockets: 8, 14, 16, 20, 24, and 28 pin 
(JAMECO). Each socket has the pin-out labeled with a wire-wrap socket ID marker, which 
slips onto the socket before wrapping (JAMECO). The part number is written onto the ID 
marker. 


Sockets are arranged in 4 horizontal rows on each board, with 
about 10 sockets per row. 

Power is distributed on the back-side of each board by bare 24- 
gauge solid copper wire supply rails soldered at equal intervals 
to Klipwrap terminals: 3-prong terminals with a square tail for 
wire-wrapping (JAMECO 34163CL). A +5V rail runs above each 
row of sockets and a ground rail runs below. Each rail connects 
directly to the aluminum module power bus using a ring tail 
con nector. 

On the pin side of the board, all connections are made with 30 
AWG Kynar wire-wrap wire (JAMECO). Red wire is used for direct 
connections to the +5V supply rail. Black wire is used for direct connections to ground. White 
wire is used for everything else. 

Power connections from the supply rails to each ICs are double-wrapped. Bypassing 
capacitors (.1 uf disc ) are soldered across the supply rails at the Klipwrap terminals; about 1 
capacitor for every 2 IC packages. 





All connections were stripped and hand-wrapped using a Radio Shack hand-wrap tool. As 
each connection was made, the corresponding line on the schematic was marked with a 
colored highlighter. 

DIP resistor networks (JAMECO) plugged into 20-pin wire-wrap sockets were used as current 
limiting resistors for the panel indicators. 



CTL Printed Circuit Board (PCB) A 

The A board contains the clock (CLK), the scaler (SCL), and the time pulse generator (TPG). 



























CTL Printed Circuit Board (PCB) B 


The B board contains the display indicators, their current-limiting resistor networks, and the 
open collector drivers. The display panel is a sheet of white styrene plastic. A push pin was 
used to make holes through the plastic, and the LEDs were inserted in rows. The panel was 
hand-lettered with an indelible marker. A few chips near the bottom right of the B board are 
associated with subsystems on the C board. 















CTL Printed Circuit Board (PCB) C 


The C board contains the sequence generator (SEQ) and control pulse matrixes (CPM-A, 
CPM-B, and CPM-C). The big ICs at the bottom are the EPROMs that hold the control pulse 
matrix table for CPM-A. Each EPROM holds the tables for 8 control signals. The large ICs at 
the top are decoders for the CPM-B and CPM-C logic. 


















Parts (ICs) 


74LS00 

(14) 

U74,U26,U27,U25,U79,U78,U55,U54,U53,U48,U13,U42,U34,U28 

74LS02 

(9) 

U4,U77,U9,U73,U45,U43,U3,U38,U32 

74LS04 

(15) 

U62,U29,U76,U69,U64,U57,U71,U59,U58,U56,U49,U41,U40,U39,U33 

74LS06 

(11) 

U22,U21,U20,U23,U14,U17,U18,U19,U16,U15,U1 

74LS08 

(2) 

U65,U10 

74LS10 

(4) 

U12,U70,U52,U51 

74LS20 

(8) 

U67,U68,U66,U63,U75,U61,U60,U6 

74LS27 

(3) 

U7,U44,U2 

74LS32 

(3) 

U72,U 11 ,U 5 

74LS74 

(1) 

U24 

74LS112 

(8) 

U8,U50,U47,U46,U3 5,U36,U37,U31 

74LS138 

(1) 

U99 

74LS154 

(7) 

U81,U82,U83,U98,U100,U101,U106 

74LS161 

(8) 

U104,U107,U108,U109,U110,U111,U112,U113 

74LS244 

(10) 

U80,U84,U85,U93,U94,U95,U96,U97,U102,U103 

74LS273 

(1) 

U105 

27C128 

(7) 

U86,U87,U88,U89,U90,U91,U92 

4001 

(1) 

U30 

555 

(1) 

U114 


IC's, sockets, PCB's, resistors, capacitors, wire-wrap wire were purchased from JAMECO. The 
2.048 MHz crystal and the IDE wire-wrap were from DigiKey. Wire ties, wire-wrap tools, and 
copper wire were purchased from Radio Shack. IDE ribbon cables were purchased from an 
online computer supplier. 


Power Budget 


dty 

mA (ea) 

mA (tot) 

74LS00 

14 

2.4 

33.6 

74LS02 

9 

2.4 

21.6 

74LS04 

15 

3.6 

54.0 

74LS06 

11 

3.6 

39.6 

74LS08 

2 

4.4 

8.8 

74LS10 

4 

1.8 

7.2 

74LS20 

8 

1.2 

9.6 

74LS27 

3 

3.4 

10.2 

74LS32 

3 

4.9 

14.7 

74LS74 

1 

4.0 

4.0 

74LS112 

8 

4.0 

32.0 

74LS138 

1 

6.3 

6.3 

74LS154 

7 

6.2 

43.4 

74LS161 

8 

19.0 

152.0 

74LS244 

10 

32.0 

320.0 

74LS273 

1 

17.0 

17.0 

27C128 

7 

25.0 

175.0 

4001 1 

0.4 

0.4 


555 1 

3.0 

3.0 


LED 61 

20.0 

1220 

.0 



Amps total 

Amps (excluding LEDs) 


EPROM generator program 


This C++ program generates all files needed to program the CPM-A EPROMs. The files are 
generated in Motorola S-Record format. 

/* 

* 

* CPM-A EPROM GENERATOR 

* 

*9/14/01 


Versions: 

Derived from AGC C + + simulator 1.15. 


Operation: 

Generates all of the CPM-A EPROM files in Motorola s2f S-Record format 
suitable for EPROM programmers. 


*/ 

#include <string.h> 
#include <stdlib.h> 
#include <ctype.h> 
#include <iostream.h> 
#include <stdio.h> 


#define MAXPULSES 15 

#define MAX_IPULSES 5 // no more than 5 instruction-generated pulses active at any time 


enum cpType { // **inferred; not defined in orignal R393 AGC4 spec. 
NO_PULSE = 0, 


//OUTPUTS FROM SUBSYSTEM A 


Cl 

= 1, 

// Carry in 

CLG 

= 2, 

// Clear G 

CLCTR 

= 3, 

// Clear loop counter 

CTR 

= 4, 

// Loop counter 

GP 

= 5, 

// Generate Parity 

KRPT 

= 6, 

// Knock down Rupt priority 

NISQ 

= 7, 

// New instruction to the SQ register 

RA 

= 8, 

// Read A 

RB 

= 9, 

// Read B 

RB14 

= 10, 

// Read bit 14 

RC 

= 11, 

// Read C 

RG 

= 12, 

// Read G 

RLP 

= 13, 

// Read LP 

RP2 

= 14, 

// Read parity 2 

RQ 

= 15, 

// Read Q 

RRPA 

= 16, 

// Read RUPT address 

RSB 

= 17, 

// Read sign bit 

RSCT 

= 18, 

// Read selected counter address 

RU 

= 19, 

// Read sum 

RZ 

ll 

M 

O 

// Read Z 

R1 

= 21, 

// Read 1 

R1C 

= 22, 

// Read 1 complimented 

R2 

= 23, 

// Read 2 

R22 

= 24, 

// Read 22 

R24 

= 25, 

// Read 24 

ST1 

= 26, 

// Stage 1 

ST2 

= 27, 

// Stage 2 

TMZ 

ll 

NJ 

CO 

// Test for minus zero 

TOV 

= 29, 

// Test for overflow 

TP 

ll 

OJ 

o 

// Test parity 

TRSM 

= 31, 

// Test for resume 

TSGN 

= 32, 

// Test sign 

TSGN2 

= 33, 

// Test sign 2 

WA 

= 34, 

// Write A 



WALP 

= 35, 

// 

Write 

A and LP 

WB 

= 36, 

// 

Write 

B 

WGx 

= 37, 

// 

Write 

G (do not reset) 

WLP 

= 38, 

// 

Write 

LP 

wove 

= 39, 

// 

Write 

overflow counter 

WOVI 

= 40, 

// 

Write 

overflow RU PT inhibit 

WOVR 

= 41, 

// 

Write 

overflow 

WP 

= 42, 

// 

Write 

P 

WPx 

= 43, 

// 

Write 

P (do not reset) 

WP2 

= 44, 

// 

Write 

P2 

WQ 

= 45, 

// 

Write 

Q 

WS 

= 46, 

// 

Write 

s 

WX 

= 47, 

// 

Write 

X 

WY 

= 48, 

// 

Write 

Y 

WYx 

= 49, 

// 

Write 

Y (do not reset) 

WZ 

= 50, 

// 

Write 

Z 


// OUTPUTS FROM 

SUBSYSTEM A; USED AS INPUTS TO SUBSYSTEM B ONLY; 

// NOT USED 

OUTSIDE CPM 


RSC 


= 51, 

// Read special and central (output to B only, not outside CPM) 

WSC 


= 52, 

// Write special and central (output to B only, not outside CPM) 

WG 


= 53, 

// Write G (output to B only, not outside CPM) 

// OUTPUTS FROM 

SUBSYSTEM A; USED AS INPUTS TO SUBSYSTEM C ONLY; 

// NOT USED 

OUTSIDE CPM 


SDV1 


= 54, 

// Subsequence DV1 is currently active 

SMP1 


= 55, 

// Subsequence MP1 is currently active 

SRSM3 


= 56, 

// Subsequence RSM3 is currently active 

// EXTERNAL 

OUTPUTS FROM 

SUBSYSTEM B 

// 




RAO 


= 57, 

// Read register at address 0 (A) 

RA1 


= 58, 

//Read register at address 1 (Q) 

RA2 


= 59, 

// Read register at address 2 (Z) 

RA3 


= 60, 

// Read register at address 3 (LP) 

RA4 


= 61, 

// Read register at address 4 

RA5 


= 62, 

// Read register at address 5 

RA6 


= 63, 

// Read register at address 6 

RA7 


= 64, 

// Read register at address 7 

RA10 


= 65, 

// Read register at address 10 (octal) 

RA11 


= 66, 

// Read register at address 11 (octal) 

RA12 


= 67, 

// Read register at address 12 (octal) 

RA13 


= 68, 

// Read register at address 13 (octal) 

RA14 


= 69, 

// Read register at address 14 (octal) 

RBK 


= 70, 

// Read BNK 

WAO 


= 71, 

// Write register at address 0 (A) 

WA1 


= 72, 

// Write register at address 1 (Q) 

WA2 


= 73, 

// Write register at address 2 (Z) 

WA3 


= 74, 

// Write register at address 3 (LP) 

WA10 


= 75, 

//Write register at add ress 10 (octal) 

WA11 


= 76, 

//Write register at add ress 11 (octal) 

WA12 


= 77, 

//Write register at add ress 12 (octal) 

WA13 


= 78, 

//Write register at add ress 13 (octal) 

WA 14 


= 79, 

//Write register at add ress 14 (octal) 

WBK 


= 80, 

// Write BNK 

WGn 


= 81, 

// Write G (normal gates)** 

W20 


= 82, 

// Write into CYR 

W21 


= 83, 

// Write into SR 

W22 


= 84, 

// Write into CYL 

W23 


= 85, 

// Write into SL 


// THESE ARE 

THE LEFTOVERS - THEY'RE PROBABLY USED IN SUBSYSTEM C 

// 



GENRST 

yo 

CO 

II 

// General Reset** 

CLIN H 

= 87, 

// Clear INHINT** 

CLIN H 1 

ll 

CO 

CO 

// Clear INHINT1** 

CLSTA 

= 89, 

// Clear state counter A (STA)** 

CLSTB 

ll 

KD 

O 

// Clear state counter B (STB)** 

CLISQ 

= 91, 

// Clear SNI** 

CLRP 

= 92, 

// Clear RPCELL** 

INH 

= 93, 

// Set INHINT** 

RPT 

ll 

KD 

A 

// Read RUPT opcode ** 

SBWG 

= 95, 

// Write G from memory 

SETSTB 

= 96, 

// Set the ST1 bit of STB 



WE 

= 97, 

// Write E-MEM from G 

WPCTR 

= 98, 

// Write PCTR (latch priority counter sequence) 

WSQ 

= 99, 

// Write SQ 

WSTB 

= 100, 

// Write stage counter B (STB)** 

R2000 

= 101, 

// Read 2000 ** 


static cpType glbl_cp[MAXPULSES]; // current set of asserted control pulses (MAXPULSES) 
enum scType { // identifies subsequence for a given instruction 


SUB0 = 0, 

// ST2 = 0, ST 1 = 0 

SUB1 = 1, 

// ST2 = 0, ST 1 = 1 

SUB2 = 2, 

// ST2 = 1, ST1 = 0 

SUB3 =3 

// ST2 = 1, ST 1 = 1 


brType { 



BROO 

= 0, 

// BR1 = 0, BR2 = 0 

BRO1 

= 1, 

// BR1 = 0, BR2 = 1 

BRIO 

= 2, 

// BR1 = 1, BR2 = 0 

BR11 

= 3, 

// BR1 = 1, BR2 = 1 

NO_BR 

= 4 

// NO BRANCH 


struct controlSubStep { 

brType br; // normally no branch (NO_BR) 

cpType pulse[MAX_IPULSES]; // contains 0 - MAXPULSES control pulses 


struct controlStep { 

controlSubStep substep[4]; // indexed by brType (BROO, BR01, BRIO, BR11) 

>; 


struct subsequence { 

controlStep tp[11]; // indexed by tpType (TP1-TP11) 

>; 


struct sequence { 

subsequence* subseq[4]; // indexed by scType 


>; 


#define STEP_INACTIVE \ 

NO_BR, {N 0_PU LSE , NO_PULSE, 
NO_BR, {N 0_PU LSE , NO_PULSE, 
NO_BR, {N 0_PU LSE , NO_PULSE, 
NO_BR, {NO_PULSE, NO_PULSE, 


NO_PU LSE , NO_PU LSE, NO_PULSE>, \ 
NO_PU LSE , NO_PU LSE, NO_PULSE>, \ 
NO_PU LSE , NO_PU LSE, NO_PULSE>, \ 
NO_PULSE, NO_PULSE, NO_PULSE> 


#define STEP(pl, p2, p3, p4, p5) \ 


NO_BR, 

NO_BR, 

NO_BR, 

NO_BR, 


{ pi, p2, p 3, p4, p5>, \ 
{N 0_PU LSE, NO_PU LSE, 
{N 0_PU LSE, NO_PU LSE, 
{NO_PULSE, NO_PULSE, 


NO_PU LSE , NO_PU LSE, NO_PULSE>, \ 
NO_PU LSE , NO_PU LSE, NO_PULSE>, \ 
NO_PULSE, NO_PULSE, NO_PULSE> 


subsequence SUB_TC0 = { 


STEP ( 

RB, 

WY, 

WS, 

Cl, 

NO_PULSE 

), // TP 1 

STEP_INACTIVE, //TP 2 






STEP ( 

WG, 

NO_PU LSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 3 

STEP ( 

RA, 

WOVI, 

NO_PU LSE, 

NO_PULSE, 

NO_PULSE 

), // TP 4 

STEP_INACTIVE, //TP 5 

STEP_INACTIVE, //TP 6 






STEP ( 

RG, 

RSC, 

WB, 

WP, 

NO_PULSE 

), // TP 7 

STEP ( 

RZ, 

WQ, 

GP, 

TP, 

NO_PULSE 

), // TP 8 

STEP ( 

RB, 

wsc, 

WG, 

NO_PULSE, 

NO_PULSE 

), // TP 9 

STEP ( 

RU, 

wz, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

),//TP 10 

STEP ( 

>; 

NISQ, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

),//TP 11 

subsequence SUB. 

_CCS0 = { 






STEP ( 

RB, 

WS, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 1 

STEP ( 

RZ, 

WY, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE 

), // TP 2 

STEP ( 

WG, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 3 

STEP_INACTIVE, // TP 4 

STEP_INACTIVE, //TP 5 






STEP ( 

RG, 

RSC, 

WB, 

TSGN, 

WP 

), // TP 6 

BROO, 

RC, 

TMZ, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

// TP 7 

BRO 1, 

RC, 

TMZ, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 




BRIO, RB, 

TMZ, 

NO_PU LSE, 

NO_PULSE, 

NO_ 

PULSE, 


BR11, RB, 

TMZ, 

NO_PULSE, 

NO_PU LSE, 

NO_ 

PULSE, 


BROO, GP, 

TP, 

NO_PULSE, 

NO_PULSE, 

NO_ 

PULSE, 

// TP 8 

BRO1, Rl, 

WX, 

GP, 

TP, 

NO_ 

PULSE, 


BRIO, R2, 

WX, 

GP, 

TP, 

NO_ 

PULSE, 


BR11, Rl, 

R2, 

WX, 

GP, 

TP, 



STEP ( RB, 

WSC, 

WG, 

NO_PULSE, 

NO_ 

PULSE 

), // TP 9 

BROO, RC, 

WA, 

NO_PULSE, 

NO_PULSE, 

NO_ 

PULSE, 

// TP 10 

BRO 1, WA, 

Rl C, 

NO_PULSE, 

NO_PULSE, 

NO_ 

PULSE, 


BRIO, RB, 

WA, 

NO_PU LSE, 

NO_PULSE, 

NO_ 

PULSE, 


BR11, WA, 

Rl C, 

NO_PULSE, 

NO_PULSE, 

NO_ 

PULSE, 


STEP ( RU, 

>; 

ST1, 

WZ, 

NO_PULSE, 

NO_ 

PULSE 

) // TP 11 

subsequence SUB_CCS1 = { 







STEP ( RZ, 

STEP_INACTIVE, //TP 2 

WY, 

WS, 

Cl, 

NO_ 

PULSE 

), // TP 1 

STEP ( WG, 

NO_PULSE, 

NO_PULSE, 

NO_PU LSE, 

NO_ 

PULSE 

), // TP 3 

STEP ( RU, 

WZ, 

NO_PULSE, 

NO_PULSE, 

NO_ 

PULSE 

), // TP 4 

STEP ( RA, 

STEP_INACTIVE, //TP 6 

WY, 

Cl, 

NO_PULSE, 

NO_ 

PULSE 

), // TP 5 

STEP ( RG, 

RSC, 

WB, 

WP, 

NO_ 

PULSE 

), // TP 7 

STEP ( RU, 

STEP_INACTIVE, //TP 9 

WB, 

GP, 

TP, 

NO_ 

PULSE 

), // TP 8 

STEP ( RC, 

WA, 

WOVI, 

NO_PULSE, 

NO_ 

PULSE 

),//TP 10 

STEP ( RG, 

>; 

RSC, 

WB, 

NISQ, 

NO_ 

PULSE 

) // TP 11 

subsequence SUB_NDXO = { 







STEP ( RB, 

STEP_INACTIVE, //TP 2 

WS, 

NO_PULSE, 

NO_PULSE, 

NO_ 

PULSE 

), // TP 1 

STEP ( WG, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_ 

PULSE 

), // TP 3 

STEP ( RA, 

STEP_INACTIVE, //TP 5 

STEP_INACTIVE, //TP 6 

WOVI, 

NO_PULSE, 

NO_PULSE, 

NO_ 

PULSE 

), // TP 4 

STEP ( RG, 

RSC, 

WB, 

WP, 

NO_ 

PULSE 

), // TP 7 

STEP ( GP, 

TP, 

NO_PULSE, 

NO_PU LSE, 

NO_ 

PULSE 

), // TP 8 

STEP ( RB, 

WSC, 

WG, 

NO_PU LSE, 

NO_ 

PULSE 

), // TP 9 

STEP ( TRSM, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_ 

PULSE 

),//TP 10 

STEP ( ST1, 

>; 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_ 

PULSE 

)i // TP 11 

subsequence SUB_NDX1 = { 







STEP ( RZ, 

STEP_INACTIVE, //TP 2 

WY, 

WS, 

Cl, 

NO_ 

PULSE 

), // TP 1 

STEP ( WG, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_ 

PULSE 

), // TP 3 

STEP ( RU, 

STEP_INACTIVE, //TP 5 

WZ, 

NO_PULSE, 

NO_PULSE, 

NO_ 

PULSE 

), // TP 4 

STEP ( RB, 

WY, 

NO_PU LSE, 

NO_PULSE, 

NO_ 

PULSE 

), // TP 6 

STEP ( RG, 

RSC, 

WB, 

WP, 

NO_ 

PULSE 

), // TP 7 

STEP ( RB, 

WX, 

GP, 

TP, 

NO_ 

PULSE 

), // TP 8 

STEP ( RB, 

STEP_INACTIVE, // TP 10 

WSC, 

WG, 

NO_PULSE, 

NO_ 

PULSE 

), // TP 9 

STEP ( RU, 

>; 

WB, 

WOVI, 

NISQ, 

NO_ 

PULSE 

),//TP 11 

subsequence SUB_RSM3 = { 







STEP ( R24, 

STEP_INACTIVE, //TP 2 

WS, 

NO_PULSE, 

NO_PULSE, 

NO_ 

PULSE 

), // TP 1 

STEP ( WG, 

STEP_INACTIVE, // TP 4 

STEP_INACTIVE, //TP 5 

STEP_INACTIVE, //TP 6 

NO_PULSE, 

NO_PULSE, 

NO_PU LSE, 

NO_ 

PULSE 

), // TP 3 

STEP ( RG, 

STEP_INACTIVE, //TP 8 

STEP_INACTIVE, //TP 9 

STEP_INACTIVE, // TP 10 

WZ, 

NO_PULSE, 

NO_PULSE, 

NO_ 

PULSE 

), // TP 7 

STEP ( NISQ, 

>; 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_ 

PULSE 

),//TP 11 

subsequence SUB_XCHO = { 







STEP ( RB, 

WS, 

NO_PULSE, 

NO_PULSE, 

NO_ 

PULSE 

), // TP 1 

STEP ( RA, 

WP, 

NO_PULSE, 

NO_PU LSE, 

NO_ 

PULSE 

), // TP 2 

STEP ( WG, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_ 

PULSE 

), // TP 3 

STEP ( WP2, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_ 

PULSE 

), // TP 4 


STEP_INACTIVE, //TP 5 



STEP_INACTIVE, //TP 6 


STEP ( 

RG, 

RSC, 


WB, 

WP, 


NO_ 

PULSE 

), // 

TP 7 

STEP ( 

GP, 

TP, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE 

), // 

TP 8 

STEP ( 

RA, 

WSC, 


WG, 

RP2 


NO_ 

PULSE 

>, // 

TP 9 

STEP ( 

RB, 

WA, 


WOVI, 

NO_ 

PULSE, 

NO_ 

PULSE 

),// 

TP 10 

STEP ( 

>; 

ST2, 

NO_PULSE, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE 

),// 

TP 11 

subsequence SUB. 

_CS0 = { 










STEP ( 

RB, 

WS, 


NO_PU LSE, 

NO_ 

PULSE, 

NO_ 

PULSE 

), // 

TP 1 

STEP_INACTIVE, //TP 2 










STEP ( 

WG, 

NO_PULSE, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE 

), // 

TP 3 

STEP_INACTIVE, // TP 4 

STEP_INACTIVE, //TP 5 

STEP_INACTIVE, //TP 6 










STEP ( 

RG, 

RSC, 


WB, 

WP, 


NO_ 

PULSE 

>, // 

TP 7 

STEP ( 

GP, 

TP, 


NO_PU LSE, 

NO_ 

PULSE, 

NO_ 

PULSE 

), // 

TP 8 

STEP ( 

RB, 

WSC, 


WG, 

NO_ 

PULSE, 

NO_ 

PULSE 

), // 

TP 9 

STEP ( 

RC, 

WA, 


WOVI, 

NO_ 

PULSE, 

NO_ 

PULSE 

),// 

TP 10 

STEP ( 

>; 

ST2, 

NO_PULSE, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE 

),// 

TP 11 

subsequence SUB. 

_TS0 = { 










STEP ( 

RB, 

WS, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE 

), // 

TP 1 

STEP ( 

RA, 

WB, 


TOV, 

WP, 



NO_ 

PULSE 


), // TP 2 











STEP ( 

WG, 

NO_PULSE, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE 

), // 

TP 3 

BROO, 

NO_PULSE, 

NO_PULSE, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE, 

// 

TP 4 

BRO1, 

RZ, 

WY, 


Cl, 

NO_ 

PULSE, 

NO_ 

PULSE, 

// 


overflow 











BRIO, 

RZ, 

WY, 


Cl, 

NO_ 

PULSE, 

NO_ 

PULSE, 

// 


underflow 











BR11, 

NO_PULSE, 

NO_PULSE, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE, 



BROO, 

NO_PULSE, 

NO_PULSE, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE, 

// 

TP 5 

BRO 1, 

Rl, 

WA, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE, 



BRIO, 

WA, 

R1C, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE, 



BR11, 

NO_PULSE, 

NO_PULSE, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE, 



STEP_INACTIVE, //TP 6 










BROO, 

NO_PULSE, 

NO_PULSE, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE, 

// 

TP 7 

BRO 1, 

RU, 

WZ, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE, 



BRIO, 

RU, 

WZ, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE, 



BR11, 

NO_PULSE, 

NO_PULSE, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE, 



STEP ( 

GP, 

NO_PULSE, 


NO_PU LSE, 

NO_ 

PULSE, 

NO_ 

PULSE 

), // 

TP 8 

STEP ( 

RB, 

WSC, 


WG, 


NO_ 

PULSE, 

NO_ 

PULSE 


), // TP 9 











STEP ( 

RA, 

WOVI, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE 

),// 

TP 10 

STEP ( 

>; 

ST2, 

NO_PULSE, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE 

),// 

TP 11 

subsequence SUB. 

_AD0 = { 










STEP ( 

RB, 

WS, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE 

), // 

TP 1 

STEP ( 

RA, 

WY, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE 

), // 

TP 2 

STEP ( 

WG, 

NO_PULSE, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE 

), // 

TP 3 

STEP_INACTIVE, // TP 4 

STEP_INACTIVE, //TP 5 

STEP_INACTIVE, //TP 6 










STEP ( 

RG, 

RSC, 


WB, 

WP, 


NO_ 

PULSE 

), // 

TP 7 

STEP ( 

RB, 

WX, 


GP, 

TP, 


NO_ 

PULSE 

), // 

TP 8 

STEP ( 

RB, 

WSC, 


WG, 

NO_ 

PULSE, 

NO_ 

PULSE 

), // 

TP 9 

STEP_INACTIVE, // TP 10 










STEP ( 

>; 

RU, 

WA, 


wove, 

ST2 


WOVI 

),// 

TP 11 

// Note: AND is performed u sing DeM orga n's Theorem : the inputs are inverted, a 






// logical OR is performed, and the result is inverted. 

The implementation 

of the 






// OR (at TP8) is somewhat unorthodox 

: the inverted 

inpu ts 

are in registers U 






// and C. The OR i 

s achieved by gating 

both registers 

onto the read/write 

bus 






// simuItaneously. 

(The bus only transfers logical l's; 

register-to-register transfers 






//are performed by clearing the destination register and then transferring 

the 






// l's from the source register to the destination). When the 

1 's from both 







// registers are simultaneously gated onto the bus, the word 

on the bus is 

a logical 






// OR of both registers. 










subsequence SUB. 

_MAS KO = { 










STEP ( 

RB, 

WS, 


NO_PU LSE, 

NO_ 

PULSE, 

NO_ 

PULSE 

), // 

TP 1 

STEP ( 

RA, 

WB, 


NO_PU LSE, 

NO_ 

PULSE, 

NO_ 

PULSE 

), // 

TP 2 

STEP ( 

WG, 

NO_PULSE, 


NO_PULSE, 

NO_ 

PULSE, 

NO_ 

PULSE 

), // 

TP 3 



STEP ( 

RC, 

WY, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 4 

STEP_INACTIVE, //TP 5 

STEP_INACTIVE, //TP 6 






STEP ( 

RG, 

RSC, 

WB, 

WP, 

NO_PULSE 

), // TP 7 

STEP ( 

RU, 

RC, 

WA, 

GP, 

TP 

),//TP 8 

(CHANGED) 







STEP_INACTIVE, //TP 9 






STEP ( 

RA, 

WB, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

),//TP 10 

(CHANGED) 

STEP ( 

>; 

RC, 

WA, 

ST2, 

WOVI, 

NO_PULSE 

)i II TP 11 

subsequence SUB. 

_M PO = { 






STEP ( 

RB, 

WS, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 1 

STEP ( 

RA, 

WB, 

TSGN, 

NO_PULSE, 

NO_PULSE 

), // TP 2 

STEP ( 

RSC, 

WG, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 3 

BROO, 

RB, 

WLP, 

NO_PU LSE, 

NO_PULSE, 

NO_PULSE, 

// TP 4 

BRO1, 

RB, 

WLP, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


BRIO, 

RC, 

WLP, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


BR11, 

RC, 

WLP, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


STEP ( 

RLP, 

WA, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 5 

STEP_INACTIVE, //TP 6 






BROO, 

RG, 

WY, 

WP, 

NO_PULSE, 

NO_PULSE, 

// TP 7 

BRO 1, 

RG, 

WY, 

WP, 

NO_PULSE, 

NO_PULSE, 


BRIO, 

RG, 

WB, 

WP, 

NO_PULSE, 

NO_PULSE, 


BR11, 

RG, 

WB, 

WP, 

NO_PULSE, 

NO_PULSE, 


BROO, 

GP, 

TP, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

// TP 8 

BRO 1, 

GP, 

TP, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


BRIO, 

RC, 

WY, 

GP, 

TP, 

NO_PULSE, 


BR11, 

RC, 

WY, 

GP, 

TP, 

NO_PULSE, 


STEP ( 

RU, 

WB, 

TSGN2, 

NO_PULSE, 

NO_PULSE 

), // TP 9 

BROO, 

RA, 

WLP, 

TSGN, 

NO_PULSE, 

NO_PULSE, 

// TP 10 

BRO 1, 

RA, 

RB 14, 

WLP, 

TSGN, 

NO_PULSE, 


BRIO, 

RA, 

WLP, 

TSGN, 

NO_PULSE, 

NO_PULSE, 


BR11, 

RA, 

RB 14, 

WLP, 

TSGN, 

NO_PULSE, 


BROO, 

ST1, 

WALP, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

// TP 11 

BRO 1, 

Rl, 

ST1, 

WALP, 

Rl C, 

NO_PULSE, 


BRIO, 

RU, 

ST1, 

WALP, 

NO_PULSE, 

NO_PULSE, 


BR11, 

>; 

RU, 

ST1, 

WALP, 

NO_PULSE, 

NO_PULSE, 


subsequence SUB. 

_M P1 = { 






STEP ( 

RA, 

WY, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 1 

STEP ( 

RLP, 

WA, 

TSGN, 

NO_PULSE, 

NO_PULSE 

), // TP 2 

BROO, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

// TP 3 

BRO 1, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


BRIO, 

RB, 

WX, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


BR11, 

RB, 

WX, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


STEP ( 

RA, 

WLP, 

NO_PU LSE, 

NO_PULSE, 

NO_PULSE 

), // TP 4 

STEP ( 

RLP, 

TSGN, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 5 

STEP ( 

RU, 

WALP, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 6 

STEP ( 

RA, 

WY, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 7 

BROO, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

// TP 8 

BRO 1, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


BRIO, 

RB, 

WX, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


BR11, 

RB, 

WX, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


STEP ( 

RLP, 

WA, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 9 

STEP ( 

RA, 

WLP, 

CTR, 

NO_PULSE, 

NO_PULSE 

),//TP 10 

STEP ( 

>; 

RU, 

ST1, 

WALP, 

NO_PULSE, 

NO_PULSE 

)i II TP 11 

subsequence SUB. 

_MP3 = { 






STEP ( 

RZ, 

WY, 

WS, 

Cl, 

NO_PULSE 

), II TP 1 

STEP ( 

RLP, 

TSGN, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 2 

STEP ( 

WG, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE, 

NO_PULSE 

), // TP 3 

STEP ( 

RU, 

WZ, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 4 

STEP ( 

RA, 

WY, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 5 

BROO, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

// TP 6 

BRO 1, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


BRIO, 

RB, 

WX, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


BR11, 

RB, 

WX, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


STEP ( 

RG, 

RSC, 

WB, 

WP, 

NO_PULSE 

), II TP 7 

STEP ( 

RLP, 

WA, 

GP, 

TP, 

NO_PULSE 

), // TP 8 

STEP ( 

RB, 

WSC, 

WG, 

NO_PULSE, 

NO_PULSE 

), // TP 9 

STEP ( 

RA, 

WLP, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

),//TP 10 

STEP ( 

RU, 

WALP, 

NISQ, 

NO_PULSE, 

NO_PULSE 

)i II TP 11 



>; 


subsequence SUB_DVO = { 


STEP ( 

RB, 

WS, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 1 

STEP ( 

RA, 

WB, 

TSGN, 

NO_PU LSE, 

NO_PULSE 

), // TP 2 

STEP ( 

RSC, 

WG, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE 

), // TP 3 

BROO, 

RC, 

WA, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

// TP 4 

BRO 1, 

RC, 

WA, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


BRIO, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


BR11, 

NO_PULSE, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE, 

NO_PULSE, 


BROO, 

Rl, 

WLP, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

// TP 5 

BRO 1, 

Rl, 

WLP, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


BRIO, 

R2, 

WLP, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE, 


BR11, 

R2, 

WLP, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE, 


STEP ( 

RA, 

WQ, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 6 

STEP ( 

RG, 

WB, 

TSGN, 

WP, 

NO_PULSE 

), // TP 7 

STEP ( 

RB, 

WA, 

GP, 

TP, 

NO_PULSE 

), // TP 8 

BROO, 

RLP, 

R2, 

WB, 

NO_PULSE, 

NO_PULSE, 

// TP 9 

BRO 1, 

RLP, 

R2, 

WB, 

NO_PULSE, 

NO_PULSE, 


BRIO, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


BR11, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


BROO, 

RB, 

WLP, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE, 

// TP 10 

BRO 1, 

RB, 

WLP, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


BRIO, 

RC, 

WA, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


BR11, 

RC, 

WA, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE, 


STEP ( 

>; 

Rl, 

ST1, 

WB, 

NO_PULSE, 

NO_PULSE 

),//TP 11 

subsequence SUB. 

_D V1 = { 






STEP ( 

R22, 

WS, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 1 

STEP ( 

RQ, 

WG, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 2 

STEP ( 

RG, 

WQ, 

WY, 

RSB, 

NO_PULSE 

), // TP 3 

STEP ( 

RA, 

WX, 

NO_PU LSE, 

NO_PULSE, 

NO_PULSE 

), // TP 4 

STEP ( 

RLP, 

TSGN2, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 5 


STEP_INACTIVE, //TP 6 
STEP ( RU, 

BROO, NO_PU LSE, 

BRO1, NO_PULSE, 

BRIO, RU, 

BR11, RU, 

BROO, RB, 

BRO1, RB, 

BRIO, RB, 

BR11, RB, 

STEP ( RG, 

BROO, ST1, 

BRO 1, ST1, 

BRIO, RC, 

BR11, RB, 

>; 

subsequence SUB_SUO = { 

STEP ( RB, 

STEP ( RA, 

STEP ( WG, 

STEP_INACTIVE, // TP 4 
STEP_INACTIVE, //TP 5 
STEP_INACTIVE, //TP 6 


STEP ( RG, 

RSC, 

WB, 

WP, 

NO_PULSE 

), // TP 7 

STEP ( RC, 

WX, 

GP, 

TP, 

NO_PULSE 

), // TP 8 

STEP ( RB, 

STEP_INACTIVE, // TP 10 

WSC, 

WG, 

NO_PULSE, 

NO_PULSE 

), // TP 9 

STEP ( RU, 

>; 

WA, 

wove, 

ST2, 

WOVI 

),//TP 11 

subsequence SUB_RUPT1 = { 






STEP ( R24, 

STEP_INACTIVE, //TP 2 

WY, 

WS, 

Cl, 

NO_PULSE 

), // TP 1 

STEP ( WG, 

STEP_INACTIVE, // TP 4 

STEP_INACTIVE, //TP 5 

STEP_INACTIVE, //TP 6 

STEP_INACTIVE, //TP 7 

STEP_INACTIVE, //TP 8 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 3 

STEP ( RZ, 

WG, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 9 

STEP ( RU, 

WZ, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE 

)i // TP 10 


TSGN, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 7 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

// TP 8 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


WQ, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


WQ, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


RSB, 

WG, 

NO_PULSE, 

NO_PULSE, 

// TP 9 

RSB, 

WG, 

NO_PULSE, 

NO_PULSE, 


WG, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


WG, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


WB, 

TSGN, 

NO_PULSE, 

NO_PULSE 

),//TP 10 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

// TP 11 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 


WA, 

ST2, 

NO_PULSE, 

NO_PULSE, 


WA, 

ST2, 

NO_PULSE, 

NO_PULSE, 



WS, 

NO_PU LSE, 

NO_PULSE, 

NO_PULSE 

), // TP 1 

WY, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 2 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 3 



STEP ( ST1, 

>; 

ST2, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

),//TP 11 

subsequence SUB_RUPT3 = { 






STEP ( RZ, 

WS, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 1 

STEP ( RRPA, 

WZ, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE 

), // TP 2 

STEP ( RZ, 

STEP_INACTIVE, // TP 4 

STEP_INACTIVE, //TP 5 

STEP_INACTIVE, //TP 6 

STEP_INACTIVE, //TP 7 

STEP_INACTIVE, //TP 8 

KRPT, 

WG, 

NO_PULSE, 

NO_PULSE 

), // TP 3 

STEP ( RB, 

STEP_INACTIVE, // TP 10 

WSC, 

WG, 

NO_PULSE, 

NO_PULSE 

), // TP 9 

STEP ( ST2, 

>; 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

),//TP 11 

subsequence SUB_STD2 = { 






STEP ( RZ, 

STEP_INACTIVE, //TP 2 

WY, 

WS, 

Cl, 

NO_PULSE 

), // TP 1 

STEP ( WG, 

NO_PULSE, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE 

), // TP 3 

STEP ( RU, 

STEP_INACTIVE, //TP 5 

WZ, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE 

), // TP 

STEP_INACTIVE, //TP 6 
STEP ( RG, 

RSC, 

WB, 

WP, 

NO_PULSE 

), // TP 7 

STEP ( GP, 

TP, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 8 

STEP ( RB, 

STEP_INACTIVE, // TP 10 

WSC, 

WG, 

NO_PULSE, 

NO_PULSE 

), // TP 9 

STEP ( NISQ, 

>; 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

)i // TP 11 

subsequence SUB_PINC = { 






STEP ( WS, 

STEP_INACTIVE, //TP 2 

RSCT, 

NO_PU LSE, 

NO_PULSE, 

NO_PULSE 

), // TP 1 

STEP ( WG, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 3 

STEP ( Rl, 

STEP_INACTIVE, //TP 5 

WY, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 4 

STEP ( RG, 

WX, 

WP, 

NO_PULSE, 

NO_PULSE 

), // TP 6 

STEP ( TP, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 7 

STEP ( WP, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 8 

STEP ( RU, 

CLG, 

WPx, 

NO_PULSE, 

NO_PULSE 

), // TP 9 

STEP ( RU, 

WG x, 

WOVR, 

NO_PULSE, 

NO_PULSE 

)i // TP 10 

STEP_INACTIVE, //TP 11 

>; 






subsequence SUB_MINC = { 






STEP ( WS, 

STEP_INACTIVE, //TP 2 

RSCT, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 1 

STEP ( WG, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE, 

NO_PULSE 

), // TP 3 

STEP ( WY, 

STEP_INACTIVE, //TP 5 

Rl C, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE 

), // TP 4 

STEP ( RG, 

WX, 

WP, 

NO_PULSE, 

NO_PULSE 

), // TP 6 

STEP ( TP, 

NO_PULSE, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE 

), // TP 7 

STEP ( WP, 

NO_PULSE, 

NO_PULSE, 

NO_PU LSE, 

NO_PULSE 

), // TP 8 

STEP ( RU, 

CLG, 

WPx, 

NO_PULSE, 

NO_PULSE 

), // TP 9 

STEP ( RU, 

WG x, 

WOVR, 

NO_PULSE, 

NO_PULSE 

),//TP 10 

STEP_INACTIVE, //TP 11 

>; 






subsequence SUB_SHINC = { 






STEP ( WS, 

STEP_INACTIVE, //TP 2 

RSCT, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 1 

STEP ( WG, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 3 

STEP ( WY, 

STEP_INACTIVE, //TP 5 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 4 

STEP ( RG, 

WYx, 

WX, 

WP, 

NO_PULSE 

), // TP 6 

STEP ( TP, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 7 

STEP ( WP, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE, 

NO_PULSE 

), // TP 8 

STEP ( RU, 

CLG, 

WPx, 

NO_PU LSE, 

NO_PULSE 

), // TP 9 

STEP ( RU, 

WG x, 

WOVR, 

NO_PU LSE, 

NO_PULSE 

),//TP 10 


STEP_INACTIVE, //TP 11 

>; 

char* subseqString [] = 

{ 


"TCO", 



"CCSO", 

"CCS1", 

"NDXO", 

"NDX1", 

"RSM3 ", 

"XCH 0", 

"CSO", 

"TSO", 

"ADO", 

"MASKO", 

"MPO", 

"MPi", 

"MP3", 

"DVO", 

"DV1", 

"SUO", 

"RUPT1", 

"RUPT3", 

"STD 2", 

"PINCO", 

"MINCO", 

"SHINCO ", 

" NO_S EQ" 

>; 

enum subseq { 


TCO 

= 0, 

CCSO 

= 1, 

CCS1 

= 2, 

NDXO 

= 3, 

NDX1 

= 4, 

RSM3 

= 5, 

XCH 0 

= 6, 

CSO 

= 7, 

TSO 

= 8, 

ADO 

= 9, 

MASKO 

= 10 

MPO 

= 11 

MPI 

= 12 

MP3 

= 13 

DVO 

= 14 

DV1 

= 15 

SUO 

= 16 

RUPT1 

= 17 

RUPT3 

= 18 

STD2 

= 19 

PINCO 

= 20 

MINCO 

= 21 

SHINCO 

= 22 

NO_SEQ 

= 23 


enum tpType { 


STBY 

= 0, 


PWRON 

= 1, 


TP1 

= 2, 

// TIME PULSE 1: start of memory cycle time (MCT) 

TP2 

= 3, 


TP3 

= 4, 


TP4 

= 5, 


TP5 

= 6, 


TP6 

= 7, 

// EMEM is available in G register by TP6 

TP7 

= 8, 

// FMEM is available in G register by TP7 

TP8 

= 9, 


TP9 

= 10, 


TP10 

= 11, 

// G register written to memory beginning at TP10 

TP11 

= 12, 

// TIME PULSE 11: end of memory cycle time (MCT) 

TP12 

= 13, 

// select new subsequence/select new instruction 

SRLSE 

= 14, 

// step switch release 

WAIT 

= 15 



subseq instructionSubsequenceDecoder( 

int SB2_field, int SBl_field, int SQ_field, int STB_field) 



{ 


// Combinational logic decodes instruction and the stage count 
// to get the instruction subsequence, 
static subseq decode[16][4] = { 


{ 

TCO, 

RUPT1, 

STD2, 

RUPT3 

>, // 00 

{ 

CCSO, 

CCS1, 

N 0_SEQ, 

NO_SEQ 

>, // 01 

{ 

NDXO, 

NDX1, 

N 0_SEQ, 

RSM3 

>, // 02 

{ 

XCHO, 

N 0_SEQ, 

STD2, 

NO_SEQ 

>, // 03 

{ 

N 0_SEQ, 

N 0_SEQ, 

N 0_SEQ, 

NO_SEQ 

>, // 04 

{ 

N 0_SEQ, 

N 0_SEQ, 

N 0_SEQ, 

NO_SEQ 

>, // 05 

{ 

N 0_SEQ, 

N 0_SEQ, 

N 0_SEQ, 

NO_SEQ 

>, // 06 

{ 

N 0_SEQ, 

N 0_SEQ, 

N 0_SEQ, 

NO_SEQ 

>, // 07 

{ 

N 0_SEQ, 

N 0_SEQ, 

N 0_SEQ, 

NO_SEQ 

>, // 10 

{ 

MPO, 

MP1, 

N 0_SEQ, 

MP3 

>, // 11 

{ 

DVO, 

DV1, 

STD2, 

NO_SEQ 

>, // 12 

{ 

SUO, 

N 0_SEQ, 

STD2, 

NO_SEQ 

>, // 13 

{ 

CSO, 

N 0_SEQ, 

STD2, 

NO_SEQ 

>, // 14 

{ 

TSO, 

N 0_SEQ, 

STD2, 

NO_SEQ 

>, // 15 

{ 

ADO, 

N 0_SEQ, 

STD2, 

NO_SEQ 

>, // 16 

{ 

MASKO, 

N 0_SEQ, 

STD2, 

NO_SEQ 

> // 17 


>; 


> 


if(SB2_fieId = = 0 && SBl_field = = 1) 
return PINCO; 

else if (S B 2_fie Id == 1 && SBl_field == 0) 

return MINCO; 

else 


return deco de[SQ_ field] [ STB_ f ie I d ]; 


void clearControlPu lses() 

{ 

for(unsigned i = 0; i<MAXPULSES; i+ + ) 
g lb I_cp [i] = NO_PULSE; 


> 


void assert(cpType* pulse) 

{ 

int j = 0; 

for(unsigned i = 0; i<MAXPULSES && j< MAX_IPULSES && pulse[j] != NO_PULSE; i+ + ) 

{ 


if (g lb l_c p [i] == IN 0_PU L5E) 

{ 

g I bl_cp [ i ] = p u Ise [ j ]; 

) ++; 

> 

> 


> 


void assert(cpType pulse) 
{ 


> 


for(unsigned i = 0; i<MAXPULSES; i+ + ) 

{ 


if (g lb l_c p [i] == NO_PULSE) 

{ 

g Ibl_cp [i] = pulse; 

break; 


> 


> 


void get_CPM_A(int CPM_A_address) 

{ 

// EPROM address bits (bit 1 is LSB) 
// 1: register BR2 

// 2 : register BR1 

// 3-6: register SG (4) 

// 7,8: register STB (2) 

// 9-12: register SQ (4) 

// 13: STB_01 



// EPROM emulator 

int SB2_field = (CPM_A_address >> 13) & Oxl; 
int SBl_field = (CPM_A_address >> 12) & Oxl; 
int SQ_field = (CPM_A_address > > 8) & Oxf; 
int STB_field = (CPM_A_address >> 6) & 0x3; 
int SG_field = (CPM_A_address > > 2) & Oxf; 
int BRl_field = (CPM_A_address >> 1) & Oxl; 
int BR2_field = (CPM_A_address ) & Oxl; 


// Decode the current instruction subsequence (glbl_subseq). 
subseq glbl_subseq = instructionSubsequenceDecoder(SB2_field, SBl_field, SQ_field, STB_field); 


static subsequence* subsp[] = 

&SUB_NDX1, &SUB. 

&SUB_MASK0, &SUB. 

&SUB_SU0, &SUB. 

&S UB_S HIN C,0 


if(gibl_subseq != NO_SEQ && // THIS TESTS OUT OK 
SG_field >= TP 1 && 

SG_field <= TP 11) 

{ 

subsequence* subseqP = subsp[glbl_subseq]; 
if(subseqP) 

{ 

// index t-2 because TP1 = 2, but array is indexed from zero 
controlStep& csref = subseqP->tp[SG_field-2]; 

brType b = (brType) ((BRl_field << 1) | BR2_field); 

controlSubStep& cssref = csref.substep[b]; 
if(cssref. br == NO_BR) 

cssref = csref. substep[0]; 

cpType* p = cssref.pulse; 
assert(p); 

> 

> 


&SUB_TC0, 

&SUB_XCH0, 

&SUB_MP1, 

&SUB_RUPT3, 

>; 


&SUB_CCS0, 
&SUB_CS0, 
&SUB_MP3, 
&SUB STD2, 


&SUB_CCS1, 
&SUB_TS0, 
&SUB_DV0, 
&SUB PINC, 


&SUB_NDX0, 
&SUB_AD0, 
&SUB_DV1, 
&SUB MINC, 


// Clear old control pulses. 
clearCo ntrolPulsesQ; 


// Get new control pulses for the current instruction subsequence. 


// Implement these here, because the instruction sequence decoder 
// function is buried in the CPM-A ROM and so, identification of 
// the sequences is not available outside CPM-A. CPM-C needs info 
// on these 3 sequences, 
s witch (g lb l_su bseq) 

{ 

case DV1: assert(SDVl); break; 

case MP1: assert(SMPl); break; 

case RSM3: assert(SRSM3); break; 

> 




* * 


* * 




* 


} 

char* cpTypeString[] = 

{ 

"NO_PU LSE", 

//OUTPUTS FROM SUBSYSTEM A 

"Cl", "CLG", "CLCTR", "CTR", "GP", "KRPT", "NISQ", "RA", "RB", 

"RB 14", "RC", "RG", "RLP", "RP2 M , "RQ", "RRPA", "RS B", "RSCT", 

"RU", "RZ", "Rl", "R1C", "R2", "R22", "R24", "ST1", "ST2", "TM Z", 
"TOV", "TP", "TRSM ", "TSGN", "TSGN2", "WA", "WALP", "WB", "WGx", 
"WLP", "WOVC", "WOVI", "WOVR", "WP", "WPx", "WP2", "WQ", "WS", 
"WX", "WY", "WYx", "WZ", 


RSM3, 

MP0, 

RUPT1, 


// OUTPUTS FROM SUBSYSTEM A; USED AS INPUTS TO SUBSYSTEM B ONLY; 
// NOT USED OUTSIDE CPM 



// 

"RSC", "WSC", "WG", 


// OUTPUTS FROM SUBSYSTEM A; USED AS INPUTS TO SUBSYSTEM C ONLY; 

// NOT USED OUTSIDE CPM 

// 

"SDVl", "SMP1", "SRSM3", 

//EXTERNAL OUTPUTS FROM SUBSYSTEM B 

// 

"RAO", "RAl ", "RA 2", "RA3 ", "RA4", "RA5 ", "RA 6", "R A7 ", "RA10", "RAH", 

"RA 12 ", "RA 13 ", "RA 14", "RBK", "WAO", "WA1", "W A2 ", "W A3 ", "WA10", 

"WAl 1", "WA12", "WA 13", "WA14", "WBK", "WGn", "W20", "W21", "W22", "W23", 

// THESE ARE THE LEFTOVERS - THEY'RE PROBABLY USED IN SUBSYSTEM C 

// 

"GENRST", "CLINH", "CLINH1", "CLSTA", " CLSTB", "CLISQ", "CLRP", "IN H", 

"RPT", "SBWG", "SETSTB", "WE", "WPCTR", "WSQ", "WSTB", "R2000" 

>; 

// for debug purposes only 
char* printControlPulses() 

{ 

static char buf[MAXPULSES*6]; 
strcpy(buf,""); 

for(unsigned i = 0; i<MAXPULSES && glbl_cp[i] != NO_PULSE; i+ + ) 

{ 

strcat(buf, cpTypeString[gIbl_cp[i]]); 

strcat(buf," "); 

> 

//if(strcmp(buf,"") == 0) strcat(buf,"NONE"); 
return buf; 

> 

// return the EPROM word corresponding to the pulses 
// in glbl_cp. 

unsigned writeEPROM (int lowBit) 

{ 

unsigned EPROMword = 0x00; // no pulses; default 
for(unsigned i = 0; i<MAXPULSES && glbl_cp[i] != NO_PULSE; i+ + ) 

{ 

int pulse = gIbI_cp[i] - lowBit; 

if(pulse < 0 11 pulse > 7) 

continue; // pulse is not in this EPROM 
EPROMword |= 0x01 << pulse; 

> 

// printf("%02X\n",EPRO Mword); 

//return EPROMword; 

// The CPM-A control signals are negative logic, so we need to 
// bit-flip the word. No signal is a 1, and an asserted signal is 
// a 0: 

return ((~EPROMword) & Oxff); 

> 


const unsigned agcMemSize = 0x3fff+l; // # of cells in a 16-bit address range 

void writeEPRO M(FILE* fpObj, int lowBit) 

{ 

// Write an EPROM file using Motorola's S-Record format (s2f). 

// Some parameters that control file format. You can change maxBytes 
// without affecting anything else. 'addressBytes' is determined by 
// the choosen S-Record format, 
const int maxBytes = 20; // set limit on record length 
const int addressBytes = 3; // 24-bit address range 
const int sumCheckBytes = 1; 

const int maxdata = maxBytes - addressBytes - sumCheckBytes; 

int i=0; // current EPROM address 
int sumCheck = 0; 
while (i < agcMemSize) 

{ 



// get dataByteCount; the number of bytes of EPROM data per record, 
int dataByteCount = maxdata; 
if(i + dataByteCount >= agcMemSize) 

{ 

dataByteCount = agcMemSize - i; 


> 

// write record header (*** 3 byte address assumed ***) 
int totalByteCount = dataByteCount + addressBytes + sumCheckBytes; 
fprintf(fpObj, "S2% 02X%06X", totalByteCount, i); 
sumCheck = totalByteCount & Oxff; 

sumCheck = (sumCheck + ((i & OxffOOOO) >> 16)) % 256; 
sumCheck = (sumCheck + ((i & 0x00ff00) >> 8)) % 256; 
sumCheck = (sumCheck + ((i & 0x0000ff) )) % 256; 


// write data bytes into record 
for (int j = 0; j<dataByteCount; j + + ) 

{ 

get_CPM_A(i+j); // get CPM-A pulses for address i+j 

int data = writeEPROM(lowBit); // comvert pulses to EPROM format 

fprintf(fpObj, "%02X", data); 

sumCheck = (sumCheck + data) % 256; 


> 

// terminate record by adding the checksum and a newline. 
fprintf(fpObj, "%02X\n", (~sumCheck) & Oxff); 


i += dataByteCount; 


> 

// write an end-of-file record here 
i = 0; // use address zero for last record 
sumCheck = 0x04; // byte count 

sumCheck = (sumCheck + ((i & OxffOOOO) >> 16)) % 256; 
sumCheck = (sumCheck + ((i & 0x00ff00) >> 8)) % 256; 
sumCheck = (sumCheck + ((i & 0x0000ff) )) % 256; 
fprintf(fpObj, "S804%06X%02X" / i, (~sumCheck) & Oxff); 


> 


void main(int argc, char* argv[]) 
{ 

FILE* fpObj = 0; 


fpObj = fopen("CPM 1_8 .hex", "w"); 
if(lfpObj) 

{ 

perror("fopen failed for object file"); 
exit(-l); 

> 

writeEPROM(fpObj, 1); //pulses 1-8 
fclose(fpOb j); 


fpObj = fopen("CPM9_l 6.hex", "w"); 
if(lfpObj) 

{ 

perror("fopen failed for object file"); 
exit(-l); 

> 

writeEPROM (fpObj, 9); //pulses 9-16 
fclose(fpOb j); 


fpObj = fopen("CPM 17_24.hex", "w"); 
if(lfpObj) 

{ 

perror("fopen failed for object file"); 
exit(-l); 

> 

writeEPROM (fpObj, 17); // pulses 17-24 
fclose(fpOb j); 


fpObj = fopen("CPM25_32.hex", "w"); 



if( IfpObj) 

{ 

perror("fopen failed for object file"); 
exit(-l); 

> 

writeEPROM (fpObj, 25); // pulses 25-32 
fclose(fpOb j); 


fpObj = fopen("CPM33_40.hex", "w"); 
if(lfpObj) 

{ 

perror("fopen failed for object file"); 
exit(-l); 

> 

writeEPROM (fpObj, 33); //pulses 33-40 
fclose(fpOb j); 


fpObj = fopen("CPM41_48.hex", "w"); 
if(lfpObj) 

{ 

perror("fopen failed for object file"); 
exit(-l); 

> 

writeEPROM (fpObj, 41); //pulses 41-48 
fclose(fpOb j); 


fpObj = fopen("CPM49_56.hex", "w"); 
if(lfpObj) 

{ 

perror("fopen failed for object file"); 
exit(-l); 

> 

writeEPROM (fpObj, 49); // pulses 49-56 
fclose(fpOb j); 


> 



